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

(* === Following code of Mathematica 8 generates this image. === *) a = 6; (* center hole size of a torus *) b1 = 4; (* the number of angles *) b2 = 3; (* the number of waves *) b3 = 1; (* the number of knots *) c = -40; (* distance from the center of rotation *) d = 5; (* the number of tori *) h1 = 2; (* width of a torus *) h2 = 2; (* width of a torus *) h3 = 1; (* height of a torus *) SetOptions[ParametricPlot3D, PlotRange -> Full, Mesh -> None, Boxed -> False, Axes -> None, PlotPoints -> 600, ImageSize -> 3000, Background -> RGBColor[{240, 250, 220}/255], PlotStyle -> Directive[Specularity[White, 90], Texture[Import["D:/tmp/94.jpg"]]], TextureCoordinateFunction -> ({#4, #5 Pi} &), Lighting -> "Neutral"]; g[v_] := Cos[2 Cos[Cos[Cos[v]]]]; x = t (a - h1 Cos[t] + h2 Sin[b1 s]) Cos[b3 (s + Pi/(2 b1))]; y = t (a - h1 Cos[t] + h2 Sin[b1 s]) Sin[b3 (s + Pi/(2 b1))] + c; z = t (a - h3 (g[t] + Sin[b2 t])); rm = Table[{x, y, z}.RotationMatrix[2 i Pi/d, {0, 1, 1}], {i, d}]; ParametricPlot3D[rm, {t, 0, 6 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 δεν απαιτείται.