Advanced Search
All Posts : Applications, Examples and Libraries

An easy snowflake fractal curve

Carl Love 27579 Maple
January 01 2013
8

restart;
a:= 2.75:  b:= 7.:  N:= 2^4:
X:= t-> add(sin(b^k*t)/a^k, k= 0..N):
Y:= t-> add(cos(b^k*t)/a^k, k= 0..N):
plot(
   [X, Y, 0..2*Pi], numpoints= 2^12
  ,scaling= constrained
  ,axes= none
  ,color= cyan
  ,caption= cat("Happy New Year ", StringTools:-FormatTime("%Y"))
  ,captionfont= [Helvetica, boldoblique, 24]
);
fractal

Please Wait...