εικονεσ : δομή, υφή, λουλούδι, μωβ, πέταλο, πρότυπο, μπλε, εικόνα, σχέδιο, συμμετρία, 3d, γραφικός, κόμπος, Mathematica, cg, parametricplot3d, κώδικας, πρόγραμμα, αλγόριθμος, abstruct, χαρτογράφηση, ανθοφορία των φυτών, Μπλε του κοβαλτιου 3080x3046

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

Η δωρεάν υψηλής ανάλυσης φωτογραφία δομή, υφή, λουλούδι, μωβ, πέταλο, πρότυπο, μπλε, εικόνα, σχέδιο, συμμετρία, 3d, γραφικός, κόμπος, Mathematica, cg, parametricplot3d, κώδικας, πρόγραμμα, αλγόριθμος, abstruct, χαρτογράφηση, ανθοφορία των φυτών, Μπλε του κοβαλτιου

, λαμβάνονται με ένα άγνωστη κάμερα 01/17 2017 Η εικόνα που λαμβάνεται με

Η εικόνα απελευθερώνεται ελεύθερο πνευματικών δικαιωμάτων υπό το Creative Commons CC0.

Μπορείτε να κατεβάσετε, τροποποίηση, διανομή, και να τα χρησιμοποιούν ατελώς για οτιδήποτε σας αρέσει, ακόμα και σε εμπορικές εφαρμογές. Attribution δεν απαιτείται.