Find answers to your questions about Mathematica or help others by answering their Mathematica questions.
Im trying to solve a system of two PDE (im[t,x] and ia[t,x]) that are dependent on time and distance. I’m using my own anisotropic mesh (thanks to @TimLaska) that...
Asked on 03/16/2021 by Afmo
1 answerBug introduced in 9.0 or earlier and fixed in 10.0In everything that follows I am using Roots to get the solutions to the equations. I start off with this...
Asked on 03/16/2021 by user6818
2 answerI have the following equation: Tanh[-19.4*[Zeta]]*Exp[k x] == Tanh[-19.4*[Psi]]; [Zeta] = 66; k x = 9.21;I want to calculate the...
Asked on 03/16/2021
2 answerIf I have the following data:data={{24.998, 3.01329}, {25.487, 3.1036}, {25.977, 3.18242}, {26.473, 3.2167}, {26.983, 3.13354}, {27.495, 3.03633}, {28.006, 2.95134}, {28.515, 2.88278}, {29.02, 2.8459}, {29.524, ...
Asked on 03/16/2021
1 answerI've a list of lists,tl = {{True, False, m12}, {False, m22, m33}, {m32, False, True}}and each nested list has the same length, What is the proper way to replace...
Asked on 03/16/2021 by aark
3 answerDue to backwards compatibility issues, I am using Mathematica 8.0 and it seems to have an issue with TimeConstrained. I am using this function to set a limit to the...
Asked on 03/16/2021 by Guillermo Oliver
0 answerI am making a plot with SmoothDensityHistogram that looks like this:SmoothDensityHistogram[RandomVariate[BinormalDistribution[.5], 10],MeshStyle -> Red, Mesh -> 3, PlotLegends ->Placed[BarLegend[Automatic,LabelStyle -> {GrayLevel[0.3], 30, FontFamily -> "Arial"}], After]]I would...
Asked on 03/16/2021
2 answerI've produced the following tree plot:But I want the root to be $a$, which is a string. I looked at...
Asked on 03/15/2021
1 answerI want to plot the following code, in 1D.However, code displayed below is not being plotted; no results or errors are displayedPlot[((16*10^-12)/(4*π*8.854188*Sqrt[4*π*0.125*10^6*t])*(Sum[Integrate[(([Minus]1)^m E^([Minus](x[Minus]200m-99.5)^2/4*0.125*10^6*t))/(99.5-x)^2,{x,0,100}],{m,[Minus]∞,+∞}]+Sum[Integrate[(([Minus]1)^m E^([Minus](x[Minus]200m+99.5)^2/4*0.125*10^6*t))/(99.5-x)^2,{x,0,100}],{m,[Minus]∞,+∞}])),{t,0,100},PlotRange->All]code doesn't run.Could you...
Asked on 03/15/2021
0 answert2 = Table[RotationMatrix[[Pi]/2, {1, 0, 0}].{x, 0.2 + Sin[32 x]/15,0.6},{x,-0.47,0.07,1/200}];t2r = Table[RotationMatrix[[Pi]/2.5, {0, 0, 1}].t2[[i]], {i, 1, Length[t2]}];Graphics3D[{Thickness[0.0035], Orange, Arrowheads[.045],Arrow[BezierCurve[t2r]]},ImageSize-> 600]...
Asked on 03/15/2021 by Kallol Mondal
1 answerGet help from others!
Recent Answers
Recent Questions
© 2024 TransWikia.com. All rights reserved. Sites we Love: PCI Database, UKBizDB, Menu Kuliner, Sharing RPP