Безплатна снимка : структура, колело, текстура, спирала, модел, керамика, автомобилна гума, изкуство, фигура, дизайн, симетрия, 3d, графичен, Mathematica, CG, parametricplot3d, код, програма, алгоритъм, abstruct, картография, човек прави обект 3080x2409

(* === Following code of Mathematica 8 generates this image. === *) a = 12; (* center hole size of a torus *) b1 = 5; (* the number of angles *) b2 = 3; (* the number of waves *) b3 = 3; (* the number of knots *) c = 0; (* distance from the center of rotation *) d = 1; (* the number of tori *) h1 = 1; (* 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 -> 600, ImageSize -> 3000, Background -> RGBColor[{240, 250, 220}/255], PlotStyle -> Directive[Specularity[White, 90], Texture[Import["D:/tmp/94.jpg"]]], TextureCoordinateFunction -> ({#4, #5 Pi} &), Lighting -> "Neutral"]; g[v_] := Cos[2 Cos[Cos[Cos[v]]]]; x = t s (a - h1 Cos[t] + h2 Sin[b1 s]) Cos[b3 (s + Pi/(2 b1))] + c; y = t s (a - h1 Cos[t] + h2 Sin[b1 s]) Sin[b3 (s + Pi/(2 b1))] + c; z = t s (a - h3 (g[t] + Sin[b2 t])) + c; rm = Table[{x, y, z}.RotationMatrix[2 i Pi/d, {1, 0, 0}], {i, d}]; ParametricPlot3D[rm, {t, 0, 8 Pi}, {s, 0, 2 Pi}] (*--- The Texture Another shapes and colors, and the meaning of this code in the set description *)

безплатно висока резолюция снимка на структура, колело, текстура, спирала, рог, модел, керамика, автомобилна гума, изкуство, фигура, дизайн, симетрия, 3d, графичен, Mathematica, CG, parametricplot3d, код, програма, алгоритъм, abstruct, картография, човек прави обект, автомобилна гума

, взето с неизвестен камера 01/14 2017 Картината се приема с

Изображението е освободен без авторски права под Creative Commons CC0.

Можете да изтеглите, модифицирате, разпространявате, и да ги използват роялти свободно за всичко, което пожелаете, дори и в търговски приложения. не се изисква Признание.