I saw a fun blog post today from someone who plotted the Batman symbol within Maple. Enjoy!

 

plots:-implicitplot(( (x/7)^2*sqrt(abs(abs(x)-3)/(abs(x)-3))+(y/3)^2*sqrt(abs(y+3/7*sqrt(33))/(y+3/7*sqrt(33)))-1) * (abs(x/2)-((3*sqrt(33)-7)/112)*x^2-3+sqrt(1-(abs(abs(x)-2)-1)^2)-y) * (9*sqrt(abs((abs(x)-1)*(abs(x)-.75))/((1-abs(x))*(abs(x)-.75)))-8*abs(x)-y) * (3*abs(x)+.75*sqrt(abs((abs(x)-.75)*(abs(x)-.5))/((.75-abs(x))*(abs(x)-.5)))-y) * (2.25*sqrt(abs((x-.5)*(x+.5))/((.5-x)*(.5+x)))-y) * (6*sqrt(10)/7+(1.5-.5*abs(x))*sqrt(abs(abs(x)-1)/(abs(x)-1))-(6*sqrt(10)/14)*sqrt(4-(abs(x)-1)^2)-y), x=-7..7,y=-3..3,factor=true,scaling=constrained,grid=[100,100],gridrefine=4)

The blog post can be found here (note - it is written in German):

http://www.physikblog.eu/2011/08/10/die-batcurve-aus-der-batman-gleichung/


Please Wait...