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

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

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

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

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

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