Gambar : struktur, menanam, tekstur, daun, bunga, pola, makanan, hijau, herba, menghasilkan, sayur-mayur, botani, Desain, simetri, 3d, grafis, torus, mathematica, cg, parametricplot3d, kode, program, algoritma, pemetaan, tanaman berbunga, tanaman tanah 2680x2692

(* === Following code of Mathematica 8 generates this image. === *) a = 16; (* center hole size of a torus *) b1 = 6;(* the number of angles *) b2 = 4;(* the number of waves *) b3 = 1; (* the number of knots *) c = 26; (* distance from the center of rotation *) d = 6; (* the number of tori *) h1 = 10; (* width of a torus *) h2 = 7; (* width of a torus *) h3 = 2;(* height of a torus *) SetOptions[ParametricPlot3D, PlotRange -> Full, Mesh -> None, Boxed -> False, Axes -> None, PlotPoints -> 400, ImageSize -> 2600, Background -> RGBColor[{220, 250, 200}/255], PlotStyle -> Directive[Specularity[White, 30], Texture[Import["D:/tmp/60.jpg"]]], TextureCoordinateFunction -> ({#4, #5 + 2 Pi/b1} &), Lighting -> "Neutral"]; f[v_] := TriangleWave[{-1, 1}, v/(2 Pi)]; g[v_] := TriangleWave[{-1, 1}, v/(2 Pi) + 1/4]; x = (a - h1 g[t] + h2 f[b1 s]) Cos[b3 (s + 2 Pi/b1)] + c; y = (a - h1 g[t] + h2 f[b1 s]) Sin[b3 (s + 2 Pi/b1)] + c; z = a - h3 (g[t] + f[b2 t]) + c; rm = Table[{x, y, z}.RotationMatrix[2 i Pi/d, {1, 1, 1}], {i, d}]; ParametricPlot3D[rm, {t, 0, 2 Pi}, {s, 0, 2 Pi}] (*--- The Texture Another shapes and colors *)

Bebas-foto resolusi tinggi dari struktur, menanam, tekstur, daun, bunga, pola, makanan, hijau, herba, menghasilkan, sayur-mayur, botani, Desain, simetri, 3d, grafis, torus, mathematica, cg, parametricplot3d, kode, program, algoritma, pemetaan, tanaman berbunga, tanaman tanah

, diambil dengan kamera tidak diketahui 02/21 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.