تبليغاتX
اتاق ریاضی -
سلام دوستان

و سالروز یک سالگی وبلاگمان مصادف با تاسوعای حسینی شد ممنون از همه شما که سر زدید نظر دادید وما را یاری کردید اقا پرهام- اقای ده نمکی ـ اقای معلم علی ـاقای رشیدی  اقای پهلو زاده ـاقای راستی زاده -وحدانه جان ـانوری ثانی عزیز  از همه شما ممنونم

+ نوشته شده توسط مژگان نیکدل در پنجشنبه بیست و هفتم دی 1386 و ساعت 17:9 |

=

بهترين و جذابترين كدهاي جاوا اسكريپت

(* runtime: 1.3 minutes *) phi = 0.5(1 + Sqrt[5]); f[z_] := Module[{r = Log[Abs[z]]/(4Log[phi]) - Arg[z]/(2Pi)}, 18Abs[r - Round[r]]]; OrbitTrap[zc_] := Module[{z = 0, i =0}, While[i < 100 && Abs[z] < 100 && (i < 2 || f[z] > 1), z = z^2 + zc; i++]; Hue[Arg[z]/(2Pi), Min[1, 2 f[z]], Max[0, Min[1, 2(1 - f[z])]]]]; Show[Graphics[RasterArray[Table[OrbitTrap[xc + I yc], {yc, -1.5, 1.5, 3.0/275}, {xc, -2, 1, 3.0/275}]], AspectRatio -> 1]];