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

(* === Following code of Mathematica 8 generates this image. === *) a1 = 16; (* center hole size *) a2 = 1; (* thickness of a torus *) a3 = 2; (* wave height of a torus *) b = 6; (* *) c = 5; (* distance from the center of rotation *) d = 5; (* number of torus *) h = 2; (* height of a torus *) SetOptions[ParametricPlot3D, PlotRange -> Full, Mesh -> None, Boxed -> False, Axes -> None, PlotPoints -> 600, ImageSize -> 3000, Background -> RGBColor[{250, 200, 240}/255], PlotStyle -> Directive[Specularity[White, 30], Texture[Import["D:/tmp/30.jpg"]]], TextureCoordinateFunction -> ({#4, #5 b Pi} &), Lighting -> "Neutral"]; f[v_] := Sin[2 Sin[Sin[Sin[v]]]]; g[v_] := If[Sin[v] > 0, -3, 1]; x = (a1 - a2 Cos[t] + a3 g[b s] f[b s]) Cos[s + Pi/(3 b)]; y = (a1 - a2 Cos[t] + a3 g[b s] f[b s]) Sin[s + Pi/(3 b)]; z = h f[t] + c; rm = Table[{x, y, z}.RotationMatrix[2 i Pi/d, {1, 1, 0}], {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 album description *)

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

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

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

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