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

a = 8; (* center hole size of a torus *) b1 = 5; (* number of cross *) b2 = 3; (* number of cross *) c = 3.5; (* distance from the center of rotation *) d = 3; (* number of torus *) SetOptions[ParametricPlot3D, PlotRange -> Full, Mesh -> None, Boxed -> False, Axes -> None, PlotPoints -> 300, ImageSize -> 3000, Background -> Darker[Green, 0.8], PlotStyle -> Directive[Specularity[White, 90], Texture[Import["D:/tmp/861.jpg"]]], TextureCoordinateFunction -> ({#4 + #5, #5 / Pi} &), Lighting -> "Neutral"]; g[v_] := Sum[Cos[(2 k - 1) v]/(2 k - 1), {k, 4}]; x = (a - g[t] + 3 Sin[b1 s]) Cos[b2 s] + c; y = (a - g[t] + 3 Sin[b1 s]) Sin[b2 s] + c; z = Cos[b1 s] + Sin[t] + c; rot = Table[{x, y, z}.RotationMatrix[2 i Pi/d, {0, 0, 1}], {i, d}]; ParametricPlot3D[rot, {t, 0, 2 Pi}, {s, 0, 2 Pi}] (*--- The Texture is this: www.flickr.com/photos/tanaka_juuyoh/5412528282/ *)

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

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

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

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