User Portlet
| Discussions |
|---|
| F[x_]:=Normal[Series[Exp[x],{x,0,2}]]; Plot[Evaluate[F[y]],{y,0,1}] >> |
| The best WolframAlpha method that I have been able to find is listcorrelate[{1.0, 1.25, 1.5, 1.75, 2.0, 2.25, 3.33},{1.0, 1.25, 1.5, 1.75, 2.0, 2.25, 3.33},1] What that appears to do is do the correlation between the two lists, shift/rotate... |
| If you carefully look at the documentation for Reduce you should see that it has Reduce[expression,thingToSolveFor,domain] In your Reduce above it thinks 0 |
| There is no x3 in your system. That may be an error or it may be confusing Solve. You can also try using Reduce instead of Solve. That will use different methods. Either Solve or Reduce may work better when solving n equations for n... |
| I paste all the code into a fresh notebook in version 13. Thank you for all that code. That will be essential to try to understand what problems you are having. I am guessing that starting with "An Example" might be your added code. I try to... |
| If you do not put a space between L and V and between V and t then Mathematica thinks that you have a new variable named LVt f[θ_]:=w(Log[θ]/Log[2])^2+2 L V t^(Log[θ]/Log[2])/(2-p) (*or*) f[θ_]:=w(Logθ]/Log[2])^2+2... |
| Try Plot[Sin[x] + Sin[x + Pi], {x, 0,2 Pi},WorkingPrecision->64] or FullSimplify[Sin[x] + Sin[x + Pi],0 |
| Use Select to extract each category of points and then overlay plots of the two categories using Show. You can do that with any number of properties, selections and colors. yourlist={{-1,3},{2,4},{-2,2},{3,1}}; Show[ ... |
| Try k1f=0.5;k1r=0.2;k2f=0.5;k2r=(k1r/k1f)*k2f;k3f=1.5;k3r=10^-3; S=1.25;T=S;P=0.5; R1f:=k1f*S*T;R1r:=k1r*XL[t]; R2f:=k2f*S*T*XL[t];R2r:=k2r*(XL[t])^2; R3f:=k1f*S*T;R3r:=k1r*XD[t]; R4f:=k2f*S*T*XD[t];R4r:=k2r*(XD[t])^2;... |
| This LogicalExpand[ Reduce[ {{a,b,c,d},{e,f,g,h},{i,j,k,l},{m,n,o,p}}.{a0+a3,a1-I a2,a1+I a2,a0-a3}== {a0,a1,a2,a3}, {a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p} ]] quickly gives you five different solutions. ... |