0
$\begingroup$

I have a simulation from a system of equations that runs from 0 to 50

Normal = 
  NDSolve[{A /. Parameter, A[0] == .1}, {A[t]}, {t, 0, 50}];

That produces:

enter image description here

Now I want the same exact graph but to be shifted to t= 10 i.e. the simulation should start at t = 10. I still want the graph to go from 0 to 50. How can I achieve this?

$\endgroup$
3
  • $\begingroup$ What's about to shift the scale of plot? FrameTicks->{Table[{(i-1)*10,(i-1)*10-10},{i,1,6}],Automatic}] $\endgroup$
    – Rom38
    Jul 26, 2019 at 5:11
  • $\begingroup$ First determine what part is Line in your plot: Position[plot,Line], say it is {{1,1,1,3,1,2,0}}. Then you may select points to keep in plot: plot[[1,1,1,3,1,2,1]]=Select[plot[[1,1,1,3,1,2,1]],#[[1]]>=10&], then repeat plot. Not elegant, but works. $\endgroup$
    – Alx
    Jul 26, 2019 at 12:32
  • $\begingroup$ Another variant: plot/.Line[{__}]:>(Cases[plot,Line[{x__}]:>x,\[Infinity]]//Select[#[[1]]>=10&]) $\endgroup$
    – Alx
    Jul 26, 2019 at 14:07

0

Your Answer

By clicking “Post Your Answer”, you agree to our terms of service and acknowledge that you have read and understand our privacy policy and code of conduct.