Wolfram Mathematica is a software system with built-in libraries for several areas of technical computing that allow symbolic computation, manipulating matrices, plotting functions and various types of data, implementation of algorithms, creation of user interfaces, and interfacing with programs written in other programming languages. It was conceived by Stephen Wolfram and is developed by Wolfram Research of Champaign, Illinois. The Wolfram Language is the programming language used in Mathematica.
Hi,
I want to use a module to repeatedly calculate a parameter in NDSolve, but I seem to be having trouble. Here is a simplified version of what I'm doing. In this example, I want to use the difference between v1 and v2 at a given timepoint to calculate the connection between v1 and v2 for...
Homework Statement
I am to design a small piece of code in Mathematica that takes in four parameters, a number z, the number of intervals n, the starting point, and the ending point. We are basically integrate a function of the form:
f(x)=(z+1)x^{z}
so we don't change the function at...
Homework Statement
Find V out by determining three equations with three unknowns. Use Mathematica to solve the system to find V out. See image for details
Homework Equations
--
The Attempt at a Solution
Here is my code:
\text{eq1}=v-i_3*(2r)-i_3*r-i_3*(2r)...
Homework Statement
I have a list of data in .csv format that looks like the following:
10 5 TRUE
10.1 5.1 TRUE
10.2 5.2 FALSE
10.3 5.3 FALSE
10.4 5.4 FALSE
10.5 5.5 TRUE
10.6 5.6 TRUE
...
There are thousands of entries...
I wish to create, in Mathematica, an image.
I have a set of lines, for the sake of a test, let's use:
{{10,0},{40,100}}
{{20,0},{80,100}}
Now I want my image to be 400x100 pixels, and the lines to appear as if their coordinates are those of the points in the image. If I do...
All,
I have the following code which generates a window containing the variable PrintOut and a Print button. When the print button is pressed the contents of the window are sent to the printer and simultaneously a pdf is generated.
PrintOut = "Some stuff - plots, tables etc."...
Hi
I am trying to find a smart way to write the following fraction,
$$
F = \frac{a_1}{1+\frac{a_2}{1+\frac{a_3}{1+a_4}}}
$$
Here we can just take a_n= n for simplicity. My fraction is in principle infinite, but I am trying to construct a function which can find F for a given n recursively. I...
Hi.
So I have this vector function which I need to differentiate, it is however very tricky to do by hand, so I'm doing it in Mathematica.
\hat{u}=\left\langle\bar{u}+\bar{r}\frac{(1+\gamma)}{r(r+\bar{u}\cdot \bar{r})}\right\rangle
(The brackets denote normalisation)
I want to do this...
Hi to all!
Again I have a question in mathematica.
Lets us define a system of equations e.q.
eqs1 =-0.17544 Csc[\[Theta]]^2 + Sin[2 \[Phi]] == 0 &&
0.001447 - 0.0864 Cos[\[Theta]] + 0.0288 Cos[\[Theta]]^3 == 0;
and we want to find the solution by optimization with
Reduce[{eqs1 && 0 <=...
I have a formula for the fibonacci sequence (with 1 being the first) and I noticed that the 12th fibonacci number was 144. I thought that was a neat coincidence, so I I headed over to mathematica to see if this (and 1) were the only numbers that had this property. I was almost certain that it...
Hello!
I'm writing a paper where I'm going to use markov models to evalute a device. My base for this paper is the paper written by H. Timbley. I have never used Mathematica before and thought that I would start by trying the complete code that Timbley has written in the appendix of the paper...
Homework Statement
I have an assignment for my thesis to make Hamiltonian for Schrodinger equation. I won't go into physics part of it, because that is well understood.
I need to somehow generate a specific matrix for Hamiltonian (H).
Please see the attached file of what I need to get...
Homework Statement
Evaluate ∫∫∫\sqrt{x^{2} + y^{2}} dA where R is the region bounded by the paraboloid y=x^2+z^2 and the plane y=4
Homework Equations
I believe this is a problem where cylindrical coordinates would be useful
0 ≤ z ≤ \sqrt{4-x^2}
0 ≤ r ≤ 2 ( I think this is wrong).
0 ≤ θ ≤...
Please try:
Integrate[((x - 1)^2/x) (1 - y), {y, 0, 1}, {x, 0, 1}]
Integrate[((x - 1)^2/x) (1 - y), {x, 0, 1}, {y, 0, 1}]
on your version. My Options[Integrate] GenerateConditions-> Automatic.
In the first case, it gives -3/4, the second is divergent.
For some reason when the...
Homework Statement
I'm trying to write Mathematica code to use Kramers-Kronig on a csv file with 2 columns. Column 1 is h(eV). It goes from 0 to 6, in increments of 0.1. Column 2 is alpha (cm^-1).
In the equation below, I'm guessing column 1 is Ω. But what should I put in for ω?Homework...
I wrote code where you input a prime, P > 3, and the next prime is the output. However it involves using a recursive formula with the number of recursive steps being in the order of P and using the Mod operator. Thus P must be below 255. How can I avoid this. Follows is my code:
prime = 127...
Hello,
I have a few newb questions. How can I graph the behavior of a double pendulum in Mathematica to make strange attractors like in the Lorenz equations?
So, I'm trying (keyword trying) to learn a bit of special relativity on my own via the Stanford lectures on Youtube by Leonard Susskind, but I'm running into a problem.
According to the lectures, for two different reference frames with co-ordinates marked (x, t) and (x', t'), the latter...
Every time I try to do a simple definite integral simbolically such as:
Integrate[R/P - c1/(T^2), {P,P1,P2}]
it takes about 2 minutes then gives a long conditional expression. Basically it assumes that P1 and P2 are general numbers with complex parts and negative and such.
HOW do I tell...
Hello,
I am new to mathematica, and I am having trouble using the solve/nsolve to solve my system of three equations.
Attached is my code so far. Any help would be greatly appreciated. It gets stuck in the loop section of the code. I have also pasted the code below.
Thanks!
Alicia...
I am dealing with a set of data where I have values C(x,t) for a discrete set of x and t values.
Say:
x={1,5}
t={1,3,7}
C={{C(1,1),C(1,3),C(1,7)},{C(5,1),C(5,3),C(5,7)}}.
How do I combine this to a list that looks like...
Hi all. My professor gave us some integrals that Mathematica can't do, and we have to teach Mathematica how to do them. I got the first two, but I'm stuck with the u substitutions for these six. I know that I am supposed to make an attempt at a solution, but I've tried several different u...
After conducting my experimental work I will have a number of sets of data.
It is easy to use Mathematica to find a fit of just one set, but I would like to fit all sets at once as they are too many to do them all ate once.
They will all be fitted by the same function say y=ax+b, every set...
I just need to know how can Mathematica recognize e^{-i\theta} as the eulers identity. This is, e^{-i\theta} = cos \theta + sin \theta .
When i plot a function like e^{i\theta}, nothings appear in the graph.
Help is appreciated.
Is it possible to get either one to display the less factored form of an expression? what I am doing is multiplying matrices together for geometrical optics but my answers keep coming out really ugly. For example I have
d-d\left(\frac{2d}{r}-1\right) I don't think a person would ever write...
Homework Statement
r(t)={(4+cos20t) cost,+(4+cos20t) sint,+0.4sin20t}
Calculate the curvature of r[t] for 0≤t≤4pi
Homework Equations
k = | r' x r'' | / | r' |^3
The Attempt at a Solution
r[t_]:={4+Cos[20t]*Cos[t],4+Cos[20t]*Sin[t],0.4Sin[20t]}
k[t_]:=Norm[Cross[r',r'']]/Norm[r']^3...
Hello all,
It's quite a mouthful but I need help writing a function that will behave as follows:
1.if called with an argument which is an integer, it will return the absolute value of the input
2. if called with a real argument, it will return the number rounded to the nearest...
Greetings,
I recently discovered Mathematica's Format function, and it has been of great use to me. However, there is one thing that I want to use it to do, that I have yet to be able to. I could do this easily, though, if there is some Mathematica function that works as follows...
If I put a...
Hi all.
Is there a way to plot both functions and coordinates/points on the same graph in Mathematica? The various functions for plotting each seem very incompatible. I would like to compare a probability function to Monte-Carlo-method simulation results.
Also, out of curiosity, do...
I'm trying to find the integration of my function f[x] from 1 to 4 using the indefinite integral and inserting limits using rules. I am not sure how to insert the limits with rules, have been playing about with the following
Integrate[f[x], x] /. x -> {1 >= x <= 4}
which ain't working,
any...
Why do I keep getting output that looks like this when I use Mathematica?
$$\frac{2 b k |a+b v| (2 a+b v+b v \cos (t)) \sin ^2\left(\frac{t}{2}\right)}{(a+b v)^2 \sqrt{\left(\frac{1}{\sqrt{4 a^2 k^2 \sin ^4\left(\frac{t}{2}\right)+d^2 (a+b v)^2 \sin ^2(t)}}\right)^* \sqrt{4 a^2 k^2 \sin...
I used mathematica to solve a restricted 3 body problem and was able to export my position data at different time intervals. How can I find my velocity at that final location?
Can someone identity what the issue here is before I throw my computer out the window.
By the way, this just worked 10mins ago. I restarted Mathematica and my computer but it now insist z isn't an equation.
ClearAll["Global`*"];
me = 5.974*10^(24);
mm = 7.348*10^(22);
G = 6.67259*10^(-20)...
I have a LARGE function that I must integrate over 2 variables, {x,y} both from 0 to 1.
The Function looks like :
F[x_,y_] = A[q] G[x,y] + B[q] G2[x,y] + (...)
Where (...) MAY be 100's of terms long, if not thousands. But the fact is each term is separable, in SOME way to a function of...
Homework Statement
Hey all, this is for a laboratory. I need to determine the fractal basin boundaries for a magnetic pendulum swinging chaotically about 3 other magnets underneath. I was able to plot a single path for the pendulum in Mathematica, but now I need to expand my code to...
Hi,
I am a new user of Mathematica (although I am reasonably familiar with MATLAB) and I am trying to differentiate a scalar wrt a vector Mathematica. ie, I want to check if
\begin{equation}
\phi = \textit{x}^{T} \textbf{A} \textit{y} \quad \mbox{where $\textit{x}$, $\textit{y}$ are vectors...
What are the rules of analytical – not numerical (matrix) entry of bra-ket convertion – operations on bra-ket, in particular – tensor product ?
For example – how in analytical form to do this:
U|\Psi\rangle
where:
U=I\otimesI
I=|0\rangle\langle0|+|1\rangle\langle1|...
First of all, this might give seasoned Mathematica users some serious eye sores cause I'm a newb at this xD
f[x_] := (1^-9) (Exp[38.629 x] - 1);
data = Table[if[[f[x], {x, -5, 5, 0.01}] > 0.005, 0.005, f[x]]];
ListPlot [data, DataRange -> {-5, 5}, Joined -> True,
PlotRange -> {0, 0.01}...
Hello,
I am using mathematica 9 and having some problems with a particular expression, but when I tried it on mathematica 8 it worked perfectly. My expression is:
NDSolve[{D[T[n,z], n]+i 2 D[T[n,z], {z,2}]+z^2 T[n,z]==0, T[0,z]==1, Derivative[0,1][T][n,5]==0, Derivative[0,1][T][n,0]==0}, T...
Simple Matrices proof using Mathematica help!
Homework Statement
Hey guys, I'm trying to prove that
(AB)-1 = B-1 A-1
and also the one that looks the same but is with transpose of the matrices
making A and B arbitrary 3x3 matrices. I made
A = {{a_1,a_2,a_3}...}
B =...
If anyone on here uses Mathematica maybe you could help me with an issue I am having with computing the following:
Solving for x in: Sinc[x] > (1/1.01)
I am looking only at the positive values and not making any headway with the Solve or NSolve commands. I should also mention that this...
Homework Statement
Hello. My problem is that I need to learn how to use computer software this semester. My teacher said, go and figure out how to use any computer software you like to make graphs. I have Mathematica but I am not proficient in using it, could somebody please help me with...
reduced navier stokes in mathematica urgent help please
ok I am modelling airflow in the upper airway for application i obstructive sleep apnoea, but I have hit a brick wall with mathematica. I have a system of 3 differential equations with boundary conditions, and I need to solve to find 3...
Can anyone tell me what is the problem with this Mathematica code?
Nmax = 10;
Mmax = 10;
A = 4/Pi^2*Integrate[x*Sin[n*x]*Sin[m*y], {x, 0, Pi}, {y, 0, Pi}];
B = 4/Pi^2*Integrate[Sin[n*x]*Sin[m*y], {x, 0, Pi}, {y, 0, Pi}];
u[x_, y_, t_] =
Sum[Sin[n*x]*
Sin[m*y] (A*Cos[(n^2 + m^2)*t] +...
Hi there
I was sent a .nb file with calculations already done for me, for various inputs.
I was wondering how I can edit those inputs, keeping the rest of the calculations the same, to find out what the result would be?
(see attached file for example)
Hi I decided to purchase mathematica, however it appears this is a much more complicated affair than I had imagined. I will mainly be using it for differential equations (nonlinear, nonhomogenous and coupled, what have you) to help with physics. Could someone clear up some questions I have...