Aizawa Attractor by FormulaJockey 3d model
3dmdb logo
Thingiverse
Aizawa Attractor by FormulaJockey

Aizawa Attractor by FormulaJockey

by Thingiverse
Last crawled date: 3 years ago
Inspired by ChaoticAtmospheres on DeviantArt--is a model of the Aizawa Attractor, a chaotic attractor. Produced in Mathematica. Mathematica code given below. Have never tried to print this--please let me know of your experiences.
beta = 0.7;
eps = 0.25;
alph = 0.95;
del = 3.5;
gam = 0.6;
chi = 0.1;
Timing[soln = NDSolve[{
x'[t] == (z[t] - beta)x[t] - dely[t],
y'[t] == delx[t] + (z[t] - beta)y[t],
z'[t] ==
gam + alphz[t] - ((z[t])^3)/
3 - ((x[t])^2 + (y[t])^2)(1 + epsz[t]) + chiz[t]*(x[t])^3,
x[0] == z[0] == .1,
y[0] == 0
}, {x, y, z}, {t, 0, 200}, MaxSteps -> Infinity]]
plot = ParametricPlot3D[
Evaluate[{x[t], y[t], z[t]} /. soln], {t, 0, 200}, PlotRange -> All,
PlotStyle -> Tube[.05, PlotPoints -> 100], Ticks -> None]
Export["aizawa.stl", plot]

Tags