Ilmaisia Kuvia : rakenne, pyörä, puun lehti, kukka, terälehti, kuvio, vaaleanpunainen, kuva, design, symmetria, 3d, graafinen, solmu, mathematica, cg, parametricplot3d, koodi, ohjelmoida, algoritmi, abstruct, kartoitus, land kasvi 3080x2992

(* === Following code of Mathematica 8 generates this image. === *) a = 8; (* center hole size of a torus *) b1 = 5; (* number of cross *) b2 = 3; (* number of cross *) b3 = 5; (* number of cross *) c = 0; (* distance from the center of rotation *) d = 3; (* number of torus *) g1 = 3; (* gap *) g2 = 5; (* gap *) h = 5; (* height of a torus *) SetOptions[ParametricPlot3D, PlotRange -> Full, Mesh -> None, Boxed -> False, Axes -> None, PlotPoints -> 500, ImageSize -> 3000, Background -> RGBColor[{250, 250, 230}/255], PlotStyle -> Directive[Specularity[White, 90], Texture[Import["D:/tmp/40.jpg"]]], TextureCoordinateFunction -> ({#4, #5 Pi b2} &), Lighting -> "Neutral"]; x = (a - Cos[t] + g1 Sin[b1 s]) Cos[b2 (s + Pi/4)] + c; y = (a - Cos[t] + g1 Sin[b1 s]) Sin[b2 (s + Pi/4)] + c; z = h (Sin[t] + g2 Sin[b3 s]); 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, and the meaning of this code in the set description *)

Laite, jolla vapaa korkearesoluutioinen kuva rakenne, kasvi, pyörä, rakenne, puun lehti, kukka, terälehti, kuvio, vaaleanpunainen, kuvio, kuva, design, symmetria, 3d, graafinen, solmu, mathematica, cg, parametricplot3d, koodi, ohjelmoida, algoritmi, abstruct, kartoitus, kasvi, land kasvi

, on otettu: tuntematon kamera 01/17 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.