Orbit of Moon Around the Sun

Commands to plot a parametric curve​
​

​
​The following command will plot a parametric curve given by x(t)=t and y(t) = t^2 when the parameter t lies between 0 and 1. During the rest of the lab, you will only need to modify the first six lines of the code.
In[]:=
x[t_]=t;​​y[t_]=t^2;​​start=0;​​end=1;​​xaxis=3;​​yaxis=3;​​Manipulate[Show[​​ListPlot[{{0,0}},PlotStyle{PointSize[.03],Orange},PlotRange{{-xaxis,xaxis},{-yaxis,yaxis}},AspectRatio1,AxesFalse],​​ParametricPlot[{x[t],y[t]},{t,0,t0},PlotRange{{-2.1,2.1},{-2.1,2.1}},PlotStyleBlue],​​ListPlot[{{x[t0],y[t0]}},PlotStyle{PointSize[.03],Red}]],​​{{t0,.0001,"t"},start+.0001,end},ControlPlacementLeft]
Out[]=
​
t
ListPlot
:Value of option PlotRange -> {{-xaxis,xaxis},{-yaxis,yaxis}} is not All, Full, Automatic, a positive machine number, or an appropriate list of range specifications.