Contact
CoCalc Logo Icon
StoreFeaturesDocsShareSupport News AboutSign UpSign In
| Download
Project: Calculus
Views: 302
sincs = [plot(x*sin(1/x), xmin=-(1-c),xmax=(1-c), color="black",ymin=-(1-c),ymax=(1-c)) + plot(abs(x),color='orange',xmin=-(1-c),xmax=(1-c),ymin=-(1-c),ymax=(1-c)) + plot(-abs(x),color='blue',xmin=-(1-c),xmax=(1-c),ymin=-(1-c),ymax=(1-c)) for c in [0..0.99,step=0.03] ] A = animate(sincs) A.show(gif=True,delay=25)
xScale = 1 yScale = 0.25 cosinc = [plot(x^2*cos(1/x), xmin=-xScale*(1-c),xmax=xScale*(1-c), color="black",ymin=-yScale*(1-c),ymax=yScale*(1-c)) + plot(x^2,color='orange',xmin=-xScale*(1-c),xmax=xScale*(1-c),ymin=-yScale*(1-c),ymax=yScale*(1-c)) + plot(-x^2,color='blue',xmin=-xScale*(1-c),xmax=xScale*(1-c),ymin=-yScale*(1-c),ymax=yScale*(1-c)) for c in [0..0.99,step=0.03] ] A2 = animate(cosinc) A2.show(gif=True,delay=25)