Free Images : structure, texture, flower, pattern, food, produce, geometry, sculpture, design, symmetry, 3d, graphic, shape, torus, mathematica, cg, parametricplot3d, code, program, algorithm, mapping, geometricsculpture, pentagram, fashion accessory 3080x2387

SetOptions[ParametricPlot3D, PlotRange -> Full, Mesh -> None, Boxed -> False, Axes -> None, PlotPoints -> 400, ImageSize -> 3000, PlotStyle -> Directive[Specularity[White, 30], Texture[Import["D:/tmp/862.jpg"]]], TextureCoordinateFunction -> ({#4 + 2 #5, #5/Pi} &), Lighting -> "Neutral"]; a = 2; (* center hole size of a torus *) b = 5; (* penta-torus *) c = 10; (* distance from the center of rotation *) d = 14; (* number of torus *) g[v_] := Sum[Cos[(2 k - 1) v]/(2 k - 1), {k, 4}]; x = (a - Cos[t] - Sin[b s]) g[s + Pi/(2 b)] + c; y = Sin[t] + c; z = (a - Cos[t] - Sin[b s]) Sin[s + Pi/(2 b)] + c; rot = Table[{x, y, z}.RotationMatrix[2 i Pi/d, {1, 0, 1}], {i, d}]; ParametricPlot3D[rot, {t, 0, 2 Pi}, {s, 0, 2 Pi}] (*--- The Texture The g[] is a 4-partial sum of the Fourier series for Square wave. g[]は矩形波のフーリエ展開の最初の4項 *)

The free high-resolution photo of structure, texture, flower, pattern, food, produce, geometry, sculpture, design, symmetry, 3d, graphic, shape, torus, mathematica, cg, parametricplot3d, code, program, algorithm, mapping, geometricsculpture, pentagram, fashion accessory

, taken with an unknown camera 02/22 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.