Gambar : abstrak, struktur, tekstur, bunga, pola, logam, perhiasan, seni, Desain, simetri, 3d, grafis, torus, mathematica, cg, parametricplot3d, kode, program, algoritma, pemetaan, fashion aksesori 2680x2675
Public Domain
Ucapkan terima kasih kepada PxHere
Sematkan ke dalam artikel Anda (mis. Wordpress, Blogspot)
a = 10; (* center hole size of a torus *) b1 = 8;(* the number of angles *) b2 = 6;(* the number of waves *) c = 10; (* distance from the center of rotation *) d = 6; (* the number of tori *) h1 = 5; (* width of a torus *) h2 = 8; (* width of a torus *) SetOptions[ParametricPlot3D, PlotRange -> Full, Mesh -> None, Boxed -> False, Axes -> None, PlotPoints -> 400, ImageSize -> 2600, Background -> RGBColor[{200, 200, 240}/255], PlotStyle -> Directive[Specularity[White, 70], Texture[Import["D:/tmp/94.jpg"]]], TextureCoordinateFunction -> ({#4, #5 Pi} &), Lighting -> "Neutral"]; x = (a - h1 Cos[t] + h2 Sin[b1 s]) Cos[s + 3 Pi / (2 b1)]; y = (a - h1 Cos[t] + h2 Sin[b1 s]) Sin[s + 3 Pi / (2 b1)]; z = Sin[b2 t] + c; vc = {{0, 0, 1}, {0, 0, -1}, {0, 1, 0}, {0, -1, 0}, {1, 0, 0}, {-1, 0, 0}}; rm = Table[{x, y, z}.RotationMatrix[{{0, 0, 1}, vc[[i]]}], {i, d}]; ParametricPlot3D[rm, {t, 0, 2 Pi}, {s, 0, 2 Pi}] (*--- The Texture *)
Bebas-foto resolusi tinggi dari abstrak, struktur, tekstur, bunga, pola, logam, perhiasan, seni, Desain, simetri, 3d, grafis, torus, mathematica, cg, parametricplot3d, kode, program, algoritma, pemetaan, fashion aksesori
, diambil dengan kamera tidak diketahui 01/14 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.











