Free Images : structure, texture, petal, pattern, design, symmetry, 3d, graphic, torus, mathematica, cg, parametricplot3d, code, program, algorithm, mapping, flowering plant, flower bouquet, cut flowers, blue rose, land plant 3080x3069
Public Domain
Say thanks to PxHere
Embed into your article(eg. Wordpress, Blogspot)
(* === Following code of Mathematica 8 generates this image. === *) a = 6; (* center hole size of a torus *) b1 = 5;(* the number of angles *) b2 = 3;(* the number of waves *) b3 = 1; (* the number of knots *) c = 3; (* distance from the center of rotation *) d = 5; (* the number of tori *) h1 = 3; (* width of a torus *) h2 = 1; (* width of a torus *) h3 = 3;(* height of a torus *) SetOptions[ParametricPlot3D, PlotRange -> Full, Mesh -> None, Boxed -> False, Axes -> None, PlotPoints -> 500, ImageSize -> 3000, Background -> RGBColor[{220, 250, 100}/255], PlotStyle -> Directive[Specularity[White, 30], Texture[Import["D:/tmp/61.jpg"]]], TextureCoordinateFunction -> ({#4 + Pi, #5 + 2 Pi } &), Lighting -> "Neutral"]; f[v_] := Sin[2 Sin[Sin[Sin[v]]]]; x = (a - h1 Cos[t] + h2 f[b1 s]) Cos[b3 (s + Pi/(2 b1))] + c; y = (a - h1 Cos[t] + h2 f[b1 s]) Sin[b3 (s + Pi/(2 b1))] + c; z = a - h3 (Cos[t] + f[b2 t]) + c; rm = Table[{x, y, z}.RotationMatrix[2 i Pi/d, {0, 1, 1}], {i, d}]; ParametricPlot3D[rm, {t, 0, 2 Pi}, {s, 0, 2 Pi}] (*--- The Texture Another shapes and colors *)
The free high-resolution photo of structure, plant, texture, flower, petal, pattern, blue, design, symmetry, 3d, graphic, torus, mathematica, cg, parametricplot3d, code, program, algorithm, mapping, flowering plant, flower bouquet, cut flowers, blue rose, land plant
, taken with an unknown camera 01/17 2017 The picture taken with
The image is released free of copyrights under Creative Commons CC0.
You may download, modify, distribute, and use them royalty free for anything you like, even in commercial applications. Attribution is not required.











