xxxxxxxxxx
x,y,k=var('x,y,k')
f(x,y)=cos(81*arg(sum((sin(3*(x+I*y))*\
(x+I*y))^factorial(k),k,1,4)))
fl=[f(x,y) for x in [-1.,-.98,..,1.]
for y in [-1.,-.98,..,1.]]
list_plot(fl,axes=False,size=2,figsize=(6,6))
No comments:
Post a Comment