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

(* === Following code of Mathematica 8 generates this image. === *) a1 = 10; (* size *) a2 = 10; (* size *) b1 = 2; (* the number of cross *) b2 = 2;(* the number of cross *) b3 = 2;(* the number of waves *) b4 = 4;(* the number of waves *) c1 = 0; (* distance from the center of rotation *) c2 = 0; (* distance from the center of rotation *) d = 1; (* the number of rock *) h1 = 1; (* width of a rock *) h2 = 1; (* width of a rock *) h3 = 3;(* height of a rock *) h4 = 3;(* height of a rock *) p1 = 0; SetOptions[ParametricPlot3D, PlotRange -> Full, Mesh -> None, Boxed -> False, Axes -> False, PlotPoints -> 600, ImageSize -> 3000, Background -> RGBColor[{200, 220, 240}/255], PlotStyle -> Directive[Specularity[White, 70], Texture[Import["D:/tmp/94.jpg"]]], TextureCoordinateFunction -> ({#4, #5 b1 Pi} &), Lighting -> "Neutral"]; x = (a1 + h1 Cos[b3 t] + h2 Sin[b1 (s + p1)]) Cos[t] Cos[b2 s] + c1; y = (a2 + h1 Cos[b3 t] + h2 Sin[b1 (s + p1)]) Sin[t] Sin[b2 s] + c1; z = h3 Cos[b1 s] + h4 Sin[b4 t] + c2; rm = Table[{x, y, z}.RotationMatrix[2 Pi (i/d), {0, 0, 1}], {i, d}]; ParametricPlot3D[rm, {t, 0, Pi}, {s, 0, Pi}] (*--- The Texture Another shapes and colors, and the meaning of this code in the album description *)

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

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

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

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