Mathematica Definition and 1000 Threads

Homework Statement Hi all, I would appreciate some help with the following problem; I need to obtain and visualize the current flow and magnetic field profile of an elliptic cylinder (made from ferromagnetic material) which has a left section set at 0 volts and a right section set at 5 volts...

Hello, I have peculiar trouble with mathematica. I'm playing with lagrangians of some systems and I hit on "central problem". If I use my procedure in mathematica it solve 2 eq. of second order. But if you solve it by hand, you know, ##\phi## coord is "cyclic". And second eq. is reduced to ##...

The hypergeometric function, ##{}_{2}F_1(a,b,c;z)## can be written in terms of a power series in ##z## as follows, $${}_{2}F_1(a,b,c;z) = \sum_{n=0}^{\infty} \frac{(a)_n (b)_n}{(c)_n} \frac{z^n}{n!}\,\,\,\,\,\text{provided}\,\,\,\,|z|<1$$ So we may reexpress any hypergeometric function as a...

I am encountering an issue when I plot attempting to plot 3d band structure of graphene in Mathematica. While the general shape and curvature looks fine, the cones at the K-points are not touching, which is an important qualitative electronic property of graphene. Since further down the line I...

Hello! There is a problem with Mathematica: i calculate an integral with a help of NIntegrate and get the whole list of spherical coordinates, like {6.24, 3.14, 0.323488}, {6.26, 3.14, 0.323488}, {6.28, 3.14, 0.323488} and so on... then i create a list, like data = List[{6.24, 3.14, 0.323488}...

Hello, I have a problem in the search for symmetries in pde. I would use Mathematica(c), does anyone know how to set up the code to obtain generators and then symmetries? Thanks for all.

A have the set consisting of the complex numbers ##1 + 3r \cos \theta - i r \sin \theta##, where ## r \in [0,1]## and ##\theta## may vary between ##0## and ##2 \pi##. This is my first encounter with mathematica, and am having difficulty discerning between the methods I have found online which...

Hi, I'd like to find ``ideal'' generators for integer mod groups as quickly as possible and am running into timing problems when the number is large. It's a two-step process: (1) find orbits for all combinations of a generator set, and (2) select which generators are ideal. For (1), the step...

Hi PF! I am wondering if any of you can explain why Mathematica won't solve this ODE? I know an analytic solution exists (it's quadratic). Any help is greatly appreciated! $f0[x]$ is the name of the function. a = -1/5; DSolve[{-((2 a f0[x])/(1 + a)) + x f0'[x] + 2 (f0'[x])^2 + f0[x]...

If you are a professor is it better to use Mathematica or Matlab when it comes to publishing papers, which program creates the best graphs. I have origin as well.

I have some ugly c-code that was generated from Mathematica in years past with CForm, and looks like : (PolyLog (2,(-1 + t)*pow (-1 + q2h,-1))*pow (q2h - t,-1)*pow (-1 + \ t,-1)* (-8*pow (q2h,3)*pow (t,2) + pow (q2h,4)*(1 + pow (t,2)) - 8*q2h*pow (t,3)*(-3 + 8*t - 5*pow (t,2) +...

Hello! I'm trying to plot some eigenfunctions (for a semicircle) in Mathematica. Functions are of the following form: $$g_{ms}=J_{2m+1}(y_{ms}x) sin ((2m+1)\varphi)$$ For example, for m=0 and s=1 it should look like what I drew in the attached file "Snapshot". Well, I don't have much experience...

I notice there are some functions in Mathematica in which you can't supply directly, an array of arguments but rather must give it a list. For example, GCD and LCM. I can use for example, GCD[2,3,8] and it returns 1. However if I code: GCD[{2,3,8}], the function call fails. I know of one way...

I'd like to save a Mathematica array as a "b-file" so that I can upload it to the on-line encyclopedia of integer sequences. Here's a short version of my array: bData={{2,1},{3,1},{4,1},{5,2},{6,1},{7,2},{8,6},{9,2},{10,2},{11,4}} and the b-file format would be: 2,1 3,1 4,1 5,2 6,1 7,2 8,6...

I've been running some of my own simulations of a variation on a standard map using Verlet integration on Mathematica, and I would like to start generating maps of phase space using ~25,000 initial points. I'm currently at 1000 points using Mathematica, and each simulation takes about 15 minutes...

Why if I create a Plot 3D using mathematica 8 the graph is not showed complete unless I hold the graph clicked with the mouse. I'm using Ubuntu 14.04 a weird fact is that in the same computer I have Windows 8 and If I run the program with Windows the graph is shown perfectly. May this question...

There is a crucial bug on both WolframAlpha and Mathematica. When we give the input "Floor(sqrt(11.44-10)/0.2)" it gives wrong answer. The actual answer is six (6) but wolframalpha gives five (5). The problem is Wolframalpha calculates 11.44-10 incorrectly. Although the answer is exactly 1.44...

I can't figure out how to format a variable isomorphic expression in Mathematica so that it will look nice. The best I can do will put parentheses around everything and expand powers. For example, given the array ##\{2,4,4,3,3\}##, I'd like Mathematica to write...

Hey everyone, I'm currently in Calc 2 and the only thing I seem to be having a problem with is a couple of the convergence tests. When I take pretty much any math course, I always use mathematica to help check my answers when I'm doing HW or practicing so I don't waste time. My question is...

Hi guys! I have an unsolved problem. I'm going to calculate the concurrence for pure 2-qubit states: |Ψ>=a| up up >+b|up down> +c|down up> +d | down down > where up and down stay for uparrow and downarrow. The concurrence is defined as: C = 2|ad-bc|≥0 I have found the vector Ψ3= 1/2 (1,1, cos...

Homework Statement Consider a large Ferris wheel above a lake. The wheel is 30 meters in radius and its center stands 80 meters above the lake level. At t = 0, a stunt person stands on the top of the Ferris wheel (theta=0) which is rotating at a constant angular velocity w = 0.2 rad/s. At t =...

Homework Statement I am working on a little project in which I analyze a video I found online and try to determine if it is real of a hoax. The video I am analyzing includes a man throwing a football off of a football stadium (at the very top) and making it into a basketball hoop at field...

Consider a large Ferris wheel 30 meters in radius and its center stands 80 meters above lake level. At t = 0, a stunt person stands on the top of the Ferris wheel (theta = 0 degrees) which is rotating at a constant angular velocity w = 0.2 rad/s. At t = 0, a rescue boat is 150 m from the...

Hello, I m looking for a mathematica code for the multinomial expansion of the general case of (let's say m sum terms given in a power of n), e.g., the code for the 1st equation in http://en.wikipedia.org/wiki/Multinomial_theorem Any help would be useful. Thanks

Hi PF! I have just solved a non-linear ODE numerically in mathematica using the "NDSolve" command over a small interval ##[0,1.5]##. I'd like to be able to fit a polynomial to this solution, perhaps using the "Fit" command, although I've had no luck on my own. Any help is greatly appreciated!

Hi PF! I am trying to plot several quadratics along with two numerical solutions to some ODE's. The command I entered for the two ODE's is Plot[{{Evaluate[y[x] /. t]}, {Evaluate[y[x] /. s]}}, {x, 0, 1.2}, PlotRange -> All] where s and t have been previously defined. The plot for the...

Hello, I'm trying to plot some functions with different parameters on the same graph. For each one I have to calculate some parameters from a matrix A. I need to plot this for several matrices A, so I'd like to be able to just copy-paste the new elements in the matrix A, rather than writing them...

Is anyone familiar with Atlas 2 for mathematica to calculate the Riemann Tensor, Ricci Tensor, and scalar I have a metric that I need to calculate these things for. Can anyone help? I'm not too up on Mathematica either.

Hi PF! If I'm trying to plot something in mathematica, say ##y=x^2## and then I want to find out what ##y## is when ##x=3##, how would I do this? Thanks so much! I should add, the function I'm inputting in is a numerical solution to a non-linear ODE, so it's not as easy as simply inputting...

Hi Everyone, I need to organize a bunch of raw data into bins and their frequency. The data is quite large (about 60000 entries). However I am having a lot of trouble with the right commands. I used the Wolfram documentation center but I still keep getting error messages...

Hello everyone! I'm trying hard to solve numerically a system of coupled differential equations of first order, but I get this error everytime.. I can't find the reason.. maybe you can help me, I'd really apreciate that. This is the code: Jg=0.000043; Kg=0.5; Bg=0.06; Bpm=0.5; r=0.11...

Hello, In my problem I need to We are advised to create the Cooper pair box Hamiltonian in a matrix form in the charge basis for charge states from 0 to 5. Here is the Hamiltonian we are given H=E_C(n-n_g)^2 \left|n\right\rangle\left\langle...

Hi, I am trying to use NDSolve in Mathematica to solve a set of differential-algebraic equations: NDSolve[{-6250 f[t] + 0.025 p[t]^2 f[t] + 0.1 f[t]^3 + 3 q[t] f'[t] + f''[t] == 0, 1.5230870989335428*^-35 p[t]^4 + q'[t] == 0, -4.32*^36 q[t]^2 + 10/3 \[Pi]^2 p[t]^4 + 0.0125 p[t]^2...

See title. I have a table that I've named B. And I want to create table that is essentially the change in values of B. If I was writing this on paper I would say: Let ##b_i \in B##, for ##0\leq i\leq100##. Then let ##c_i \in C## such that ##c_i= b_{i+1}-b_{i}##. I don't know how to say that in...

Hi there, I have a a partial decay width in form of ## \frac{d \Gamma}{d \cos{\theta}~ dq^2} = ## some terms functions in q and ## \theta ## variables. How to integrate this decay width in Mathematica over this two variables ? I tried some thing like j[q_]:= ## \int_{1}^{-1} ## Gam[q, ##...

Hello, Mathematica is very new to me. Please help. n=1,2,3...,10 and stepsize between n(2)-n(1)=0.1 It is periodic. I mean n(11)=n(1). i have a initial function which depends on n and i want to solve this equation by NDsolve like that u[n, t = 0] == 1/(2*n + 1) Do [ u[n, 0], {n, 0, 10...

Hi everybody, I am relatively new to Mathematica, so please don't be to harsh on me regarding beginners' mistakes ;-) I wanted to write a script, which evaluates and plots a series of 100 spectra. Therefore I have 100 spectral data files, which provide the spectrum in the first 1340 lines and...

hi everybody i recently used NDSolve for a system with three second-order equations but it says: "NDSolve::ndsdtc: ("\"The time constraint of 1.` seconds was exceeded trying to solve for derivatives, so the system will be treated as a system of differential-algebraic equations. You can use...

Hi Forum, I'm trying to use Mathematica to graphically explore a system of four PDEs, as defined in Yang et al. (2002). Spatial Resonances and Superposition Patterns in a Reaction-Diffusion Model with Interacting Turing Modes. Physical Review Letters 88(20). The equations are: \frac{\partial...

I have simplified my problem here, in my actual problem the matrix is much bigger which makes it impossible to find eigenvalues analytically. So, I chose standard BCS problem (2x2 matrix) to demonstrate my problem with Mathematica. But, with even this simple case, it takes forever to integrate...

Homework Statement I draw two 3D graphs in Mathematica by using the "Plot3D "and I want to Show the difference between these two graphs. Can anyone tell me what command should I use? Homework EquationsThe Attempt at a Solution

When I use the code directly below, it works (indicated by the "Out:..."). tmp2 = Flatten[{33, {1, 2 + j, 6}, 55}];(*Out:{33,1,2+j,6,55} *) tmp2[[4]]; (*Out: 6 *) But when I use it inside a loop, it acts like the tmp2 list is not the correct size: For[j = 0, j <= 5, j++, tmp2 = Flatten[{33...

Hi PF! So in mathematica I am trying to see if a function converges so I type: SumConverge[2/(n*Pi) Exp[-n^2*t] Sin[n x], n] All mathematica does here is echo back what I typed in. Is something I'm doing wrong? Thanks!

I have a very simple issue with Mathematica, but I can't seem to find an answer for it. I solved an equation with DSolve, and I got a result as an array of the following type: Solution = { A11 -> Function[ {t} , expression1] , A22 ->Function[ {t}, expression 2] , etc } Now I want to define...

I want to write a line of code at the top of my .nb and have Mathematica treat the specified variables as real only. I've tried using "Assumptions" and "Assuming", but it just won't work. I still get back answers where the entire expression is returned inside the Re[ ] command, like it is...

Recently, I have looked into nonelementary integrals and I have a question. When looking at ∫sin(sinx)dx, which I know cannot be represented as an elementary function, I wondered what the function would look like. Using mathematica, I was able to get a graph of f(x)=∫0xsin(sinx)dx. Does the...

Just joined. I've been slowly working my way through Susskind's Theoretical Minimum books, so I'll be looking for discussions of those and his lectures on the same topics. I have a lot of scientific interests, including fundamental physics, mathematical biology, economic geology, electronics...

I want to be able to extract from mathematica, an undertermined gauges, like in pertubation theory: $$\delta_0(\epsilon)x_0+\delta_1(\epsilon)x_1+\cdots+\delta_k(\epsilon)x_k $$ And to extract the guages (deltas) and the coefficients (x_i's) from the code, how do you propose me to code this?To...

I want to solve a differential equation of the form d/dt (R) = B(t) where R and B are two complex matrices, with time dependent functions as their coefficients. I want to solve these 3x3 differential equations (ones on the diagonal are actually coupled) and to obtain a matrix form for R. So...

How to divide two sequences in Wolfam Mathematica? For example f_n=\frac{1}{n}=1,\frac{1}{2},\frac{1}{3},... and g_n=n^2=1,4,9,... I want to get h_n=1,\frac{1}{8},\frac{1}{27}...=\frac{f_n}{g_n} How to do that in Wolfram Mathematica?