Ilmaisia Kuvia : rakenne, kierre-, kuvio, vihreä, ympyrä, korut, kirjasinlaji, design, symmetria, 3d, graafinen, solmu, torus, mathematica, cg, parametricplot3d, koodi, ohjelmoida, algoritmi, kartoitus, muotiasusteena 3080x3126
Public Domain
Sano kiitos PxHere
Upota artikkeliisi (esim. Wordpress, Blogspot)
a = 12; (* center hole size of a torus *) b1 = 5; (* the number of angles *) b2 = 4; (* the number of waves *) b3 = 2; (* the number of knots *) c = 5; (* distance from the center of rotation *) d = 6; (* the number of tori *) h1 = 3; (* width of a torus *) h2 = 2; (* width of a torus *) h3 = 5; (* height of cross *) SetOptions[ParametricPlot3D, PlotRange -> Full, Mesh -> None, Boxed -> False, Axes -> None, PlotPoints -> 500, ImageSize -> 3000, Background -> RGBColor[{50, 50, 20}/255], PlotStyle -> Directive[Specularity[White, 50], Texture[Import["D:/tmp/91.jpg"]]], TextureCoordinateFunction -> ({#4, #5 /Pi} &), Lighting -> "Neutral"]; x = (a - h1 Cos[t] + h2 Sin[b1 s]) Cos[b3 s]; y = (a - h1 Cos[t] + h2 Sin[b1 s]) Sin[b3 s]; z = h3 Cos[b1 s] + 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 *)
Laite, jolla vapaa korkearesoluutioinen kuva rakenne, rakenne, kierre-, kuvio, vihreä, ympyrä, korut, kirjasinlaji, design, symmetria, 3d, graafinen, solmu, torus, mathematica, cg, parametricplot3d, koodi, ohjelmoida, algoritmi, kartoitus, muotiasusteena
, on otettu: tuntematon kamera 01/22 2017 Laite, jolla kuva on otettu:
Kuva julkaistaan tekijänoikeuksista vapaana käytettäväksi Creative Commons CC0-lisenssin alla.
Voit ladata, muokata, jakaa sekä käyttää kuvia vapaasti, jopa kaupallisesti, ilman eri lupaa tai tunnustuksen antamista tekijälle.











