Gambar : kayu apung, pohon, cabang, struktur, tekstur, pola, ranting, dekorasi Natal, angka, Desain, simetri, 3d, grafis, ukiran, simpul, mathematica, cg, parametricplot3d, kode, program, algoritma, abstruct, pemetaan, rasa 3080x3158

(* === Following code of Mathematica 8 generates this image. === *) a1 = 16; (* center hole size *) a2 = 3; (* thickness of a torus *) a3 = 3; (* wave height of a torus *) b1 = 7;(*number of cross*) b2 = 3;(*number of cross*) c = 12; (* distance from the center of rotation *) d = 5; (* number of torus *) h = 1; (* height of a torus *) SetOptions[ParametricPlot3D, PlotRange -> Full, Mesh -> None, Boxed -> False, Axes -> None, PlotPoints -> 600, ImageSize -> 3000, Background -> RGBColor[{220, 250, 230}/255], PlotStyle -> Directive[Specularity[White, 30], Texture[Import["D:/tmp/31.jpg"]]], TextureCoordinateFunction -> ({#4, #5 b1 Pi} &), Lighting -> "Neutral"]; f[v_] := Sin[2 Sin[Sin[Sin[v]]]]; g[v_] := If[Sin[v] > 0, -3, 1]; x = (a1 - a2 Cos[t] + a3 g[b1 s] f[b1 s]) Cos[b2 s]; y = (a1 - a2 Cos[t] + a3 g[b1 s] f[b1 s]) Sin[b2 s]; z = h (Cos[b1 s] + f[t]) + c; rm = Table[{x, y, z}.RotationMatrix[2 i Pi/d, {1, 1, 0}], {i, d}]; ParametricPlot3D[rm, {t, 0, 2 Pi}, {s, 0, 2 Pi}] (*--- The Texture Another shapes and colors, and the meaning of this code in the album description *)

Bebas-foto resolusi tinggi dari kayu apung, pohon, cabang, struktur, kayu, tekstur, pola, ranting, dekorasi Natal, angka, Desain, simetri, 3d, grafis, ukiran, simpul, mathematica, cg, parametricplot3d, kode, program, algoritma, abstruct, pemetaan, rasa

, diambil dengan kamera tidak diketahui 01/13 2017 gambar yang diambil dengan

Gambar dirilis bebas dari hak cipta di bawah Creative Commons cc0.

Anda dapat mendownload, memodifikasi, mendistribusikan, dan menggunakannya bebas royalti untuk apa pun yang Anda suka, bahkan dalam aplikasi komersial. Atribusi tidak diperlukan.