渦巻きフラクタルあなたが数学が好きなら、ここに楽しい例があります。あなたはおそらくフラクタルのことを聞いたことがあるでしょう。今日、多くのフラクタルセットがあります。これらのセットの1つは呼ばれます渦巻きフラクタル 。これについて詳しく知ることができます MathWorldの記事 。この記事ではMathematicaとWolfram言語を使用します。これらには多くの数学専用の機能がたくさんありますが、JMPデータテーブルで独自のフラクタルデモを作成できます。
の θ そして φ データ列は、式を使用して再帰的フラクタル角を生成します。式は定数に依存します s 、これはテーブル変数として定義されているため、簡単に表示および変更できます。定数 s 最初はπに等しいですが、他の有名な数学定数や物理定数、または任意の値に変更できます。
ポイント間の距離は常に1です。
のバツそして y データ列は極座標から直交座標への変換を実行し、再帰関係を適用します。このバージョンは、記事と同様に10,000回の再帰を使用しますが、多かれ少なかれ再帰を使用して形状を変更できます。
使用渦巻きフラクタルグラフビルダーを起動し、フラクタルを視覚化するテーブルスクリプト。
テーブル変数の値を変更すると、式が実行されてデータ列が更新されることに注意してください。この変更は、グラフビルダーに自動的にプッシュされ、新しいプロットが作成されます。
再：カリキュラフラクタルいいね！これにより、テーブル変数の値を簡単に変更し、効果を確認できます。
NamesDefaultToHere(1);
dt = DataTable("Curlicue Fractal.jmp");
sVal = dt << getTableVariable("s");
NewWindow("Curlicue Fractal Control",
PanelBox("Move the slider to update the fractal",
SliderBox(pi() - 0.3, pi() + 0.3, sVal, sliderScript);
);
);
sliderScript =
Expr(
STV = Expr(dt << setTableVariable("s", sValTBD));
SubstituteInto(STV, Expr(sValTBD), sVal);
STV;
);
再：カリキュラフラクタルとてもかっこいい！
