3626.sagews

p1=plot(exp(-1/2*x)*cos(2*pi*x),x,0,6,rgbcolor=hue(0.4),legend_label='$f(x)=e^{(-1/2)x}cos(2\pi x)$' )
p2=plot(exp(-1/2*x),x,0,6,legend_label='$g(x)=e^{(-1/2)x}$')
t2=text("$f(x)$",(0.3,0.7),rgbcolor=hue(0.4))
t3=text("$g(x)$",(0.3,1))
t=t2+t3
p=plot(p1+p2+t)
p.axes_labels(['x-Achse','y-Achse'])
p.axes_label_color((0.3,0.7,1))
p.legend(True)
p.set_legend_options(shadow=True)
p.set_legend_options(loc=(4))
show(p)

f= lambda x: -((x+1)^2)+1
find_maximum_on_interval(f, -2,2)

(1.0, -1.0)

c=animate([circle((1,(abs(-1*i))+1), 1-1/(8), hue=0.7) for i in srange(-6,6,0.5)], xmin=0,ymin=0,xmax=10,ymax=10,figsize=[4,4])
show(c)