Ilmaisia Kuvia : rakenne, kasvi, puun lehti, kukka, kuvio, ruoka, vihreä, tuottaa, keltainen, ympyrä, taide, design, symmetria, 3d, graafinen, 5, 4, torus, mathematica, cg, parametricplot3d, koodi, ohjelmoida, algoritmi, abstruct, kartoitus 2680x2801

(* === Following code of Mathematica 8 generates this image. === *) a1 = 8; (* center hole size *) a2 = 3; (* thickness of a torus *) b = 3; (* tri-torus *) c = 4; (* distance from the center of rotation *) d = 6; (* number of torus *) h = 1.5; (* height of a torus *) SetOptions[ParametricPlot3D, PlotRange -> Full, Mesh -> None, Boxed -> False, Axes -> None, PlotPoints -> 500, ImageSize -> 2600, Background -> RGBColor[{220, 250, 230}/255], PlotStyle -> Directive[Specularity[White, 30], Texture[Import["D:/tmp/71.jpg"]]], TextureCoordinateFunction -> ({#4, #5 b Pi} &), Lighting -> "Neutral"]; f[v_] := TriangleWave[{-1, 1}, v/(2 Pi)]; g[v_] := TriangleWave[{-1, 1}, v/(2 Pi) + 1/4]; x = (a1 - a2 g[t] + f[b s]) Cos[s + Pi/3] + c; y = (a1 - a2 g[t] + f[b s]) Sin[s + Pi/3] + c; z = (a1 - a2 f[t] - h f[b s]); rm = Table[{x, y, z}.RotationMatrix[2 i Pi/d, {0, 0, 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, rakenne, puun lehti, kukka, kuvio, ruoka, vihreä, tuottaa, keltainen, ympyrä, taide, kuvio, design, symmetria, 3d, graafinen, 5, 4, torus, mathematica, cg, parametricplot3d, koodi, ohjelmoida, algoritmi, abstruct, kartoitus

, 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.