[size=150][b]このワークシートは[url=https://www.geogebra.org/m/twxxx3yq]Math by Code[/url]の一部です。[br][br]アート、背景、実装、バリエーションの順に見ていきましょう。[br][/b][/size]

[size=150][b]＜星形多角形＞[/b][/size][br][br]円をかいて、等分点をうちます。[br]等分点を同じずつ進んで結びます。[br]もし、M等分してNずつ進むと、星形多角形MNができます。[br]これは分数 [math]\frac{N}{M}[/math] に対応しますね。　

星形多角形は[br]単純なしくみでキレイな図形なので、[br]geogebraのアプリで「星形多角形」で検索すると、[br]とても多くヒットしますね。[br]多くの人の心をひきつけるということですね。[br][br][b][size=150]＜数論の視点では＞[/size][/b][br]中学入試の[b]算数の問題[/b]でも取り上げられることがあります。[br]星形多角形[math]\frac{M}{N}[/math]は倍数と約数の関係がからむからです。[br][br][color=#9900ff][b][u][size=150]質問：N等分点をMずつ進むとどんな規則性があるでしょうか？[br][/size][/u][/b][/color][br][size=150][color=#0000ff]１「MとNが[b]互いに素[/b]だとN角形になる。」[br][/color][/size][color=#0000ff]（例）[br][/color]12点を1点ずつ進むと正12角形。[br][color=#0000ff]（例）[/color][br]12点を5点ずつ進むと星形12角形。[br][b]（理由）[/b]頂点に０から11まで番号をつけると、[br]0から0に戻るのは5と12の最小公倍数の60点進んだときだね。[br]60÷5＝12個めの点が0だから、12個の頂点をすべてかぶらず進み12個めに０にかぶる。[br]だから、12点すべてを結ぶ星形12角形ができる。[br][br][color=#0000ff][size=150]２「MとNの[b]最大公約数がg[/b]のとき、N/g角形をずらしてg個かける。」[br][/size]（例）[/color][br]12点を2点ずつ進むと正12/2=6角形。[br][b]（理由）[/b]頂点に0から11まで番号をつけると、[br]0から0に戻るのは2と12の最小公倍数の12点進んだときだね。[br]12÷2＝6点めの点が０だから、6個の頂点をかぶらずに進んで6個めに０にかぶる。[br]だから、6点を結ぶ6角形ができる。[br][color=#0000ff]（例）[/color][br]12点を3点ずつ進むと正12/3=4角形。4角形が3組できる。[br][color=#0000ff]（例）[/color][br]12点を8点ずつ進むとg(12,8)=4から、正12/4=3角形。3角形が4組できる。[br][br][color=#0000ff][size=150]３「L+M＝Nなら、できるL角形とM角形は[b]合同[/b]になる。」[br][/size]（例）[/color][br]12点を1点ずつ進んでも、12－1＝11点ずつ進んでも、同じ正12角形ができる。[br][b]（理由）[/b]頂点に0から11まで番号をつけると、[br]0,1,2,3,....の順に進むのに対して0,11,10,9,...の順に進むことは、進む向きが逆になっただけ。[br]11点進むことは、逆向きに1進むことになる。できる多角形は進む数で決まるので、裏返しただけで[br]合同な多角形になるね。対称性の感覚につながり、面白いね。[br][br][color=#0000ff]（例）[/color][br]12点を3点ずつ進んでも、12－3＝9点ずつ進んでも、同じ正12/3=4角形ができる。[br][br]・こうして考察すると、中学入試の算数の問題でも取り上げられる理由がわかるね。[br]星形多角形は公倍数、公約数の考え方、互いに素の理解を[br]図形を使って試すことができる題材だから出題されてきたということだね。[br][br][b][size=150]＜星形多角形の歴史＞[br][/size][/b]星形多角形は、ルドルフ・シュタイナーという教育者が体の動き・視覚的な動きの体験を動きの想像によって抽象概念の形成を促す素材として考案したものという説があります。[br]シュタイナー教育は、リズム体操、手拍子と発声、床に描いた星形５角形の辺上の移動など５感を使って、倍数、公倍数、公約数などの数の性質の概念理解を促す進歩的な側面と、血液型とは別ですが人間を４つの気質に分類する気質決定論の側面が見られます。

[b][size=150]＜図形の視点では＞[/size][/b][br][br]星形多角形は図形なので、内角の数や内角の総和とも関係します。[br]中学入試問題でも、[b]星形５角形の内角の和[/b]をはじめとする変則多角形が出題されることがあります。[br][br]次の２つの図を利用して、一般化につながる考察をしましょう。[br][br]さっきの3番の事実から、対称性を利用してMはN/2未満とします。[br]たとえば、円の５等分点を進むとき、スタートを１として、進む順に２，３とつけます。[br]三角形１２３は二等辺三角形になるね。[br]5角形の中心Oをとると、角１O2,2O3は等しい。[br]角の大きさはM=5等分点をN進む場合は、360÷N×Mになるね。[br]二等辺三角形だから角O12=角O21=（180-360÷N×M)/2=90-180M/N[br]だから、1つの内角、角123はこの2倍になり、[b][color=#0000ff]180-360M/N[/color][/b][br][br][color=#0000ff][size=150]１．MとNが互いに素の場合の星形M角形の[b]内角の和[/b]は[br]　(180-360M/N)×N=180N-360M=[b]180(N-2M)[/b][br][/size]（例）[br][/color]5等分点を２点ずつ進む星形５角形の内角の和は180(5-2×2)=180。[br]（別解）5つの内角を延長して外角をつけたした、5角の和は180×5でこれから、外角は2回転するので和360×2をひくと、180×5-180×2×2=180(5-2×2)[br][color=#0000ff]（例）[/color][br]星形M角形の内角和が180になる条件を探ってみる。[br]Nが奇数つまり、N=2n+1とするとき、N-2M=2n+1-2M=1となるのは、[br]M=nのときだ。M=(N-1)/2と求められるね。[br]だから、5点ならN=(5-1)/2=2。7点ならN=(7-1)/2=3。[br][size=150][color=#0000ff]２．MとNの最大公約数がgの場合の星形N/g角形の内角の和は[/color][/size][color=#0000ff][size=150][b]180(N-2M)/g[br][/b]　ずらしてかくと、N/g角形がg個かけるから、和の合計は[b]180(N-2M)[/b][br][/size][/color][color=#0000ff]（例）[br][/color]12等分点を２点ずつ進む星形6角形の内角の和は180(12-2*2)/2=720で、ずらすともう一組できる。[br]結局、2組の和の合計は１番と同じ180(N-2M)。

[color=#0000ff]星形多角形をかくための「[b]数学[/b]」とそれを実現するための「[b]道具[/b]」を調べましょう。[br][/color][br][b][size=150]＜数学＞[/size][/b][br]数学としては高校程度の基礎知識が必要です。[br]（3平方の定理）[br]直角三角形の直角をはさむ辺a,bと残りの辺cの間にa[sup]2[/sup]+b[sup]2[/sup]=c[sup]2[/sup]。[br]（単位円の方程式）[br]原点O（０，０）と点A（ｘ、ｙ）の距離の2乗がｘ[sup]2[/sup]+y[sup]2[/sup]=1なら点Aは半径１の円（単位円）周上の点。[br]（三角比から三角関数へ）[br]Bが直角の直角三角形AOBのAO＝１、角AOB＝◎度とするとき、OB=cos◎、AB＝sin◎とかける。[br]（単位円周の点の座標）[br]x軸に対する角AOｘを◎度とすると、単位円周上の点Aの座標は(cos◎, sin◎)。[br][b][br]以上の基礎知識を前提にすると、星形多角形を数式化できますね。[br][br]（円のN等分点の座標）[/b][br]ｘ軸をスタートにすると次の点は360度を1周とすると(cos(360/N), sin(360/N)),[br]この角度を０倍からN-1倍にするか、1倍からN倍にする点列を作ればよいね。[br]だから、点の座標の数列PListはたとえば、次のようになるね。[br]PList=Sequence(point(cos((360°/n) (i-1)+90°),sin((360°/n) (i-1)+90°)),i,1,n)[br][br][b]（円のM等分点をN進む点の座標）[br][/b]ｘ軸から1回で進んだ点の座標は、 [br]N等分点の座標のM倍をするから、[color=#0000ff][b](cos((360/N) M), sin((360/N) M))[br][/b][/color]また、スタートをｘ軸の（１，０）ではなく、ｙ軸の（０，１）にしたいならば、[br]回転角を90度先にまわしておくことが必要になります。[br]だから、角度に90を加えればよいですね。[br]進むことをｋ回したあとの点は[b](cos((360/N) k M+90), sin((360/N) k M+90))[br][/b]となり、k＝Nにしたときに、スタートの点(0,1)にかぶるね。[br]通常の環境では、角度360度を弧度2πに直せばよいね。[br]

[b][size=150]＜道具＞[br][/size][/b][br][color=#9900ff][u][b][size=150]質問：geogebraで星形多角形をかくにはどういう数式にしたらよいでしょうか。[br][br][/size][/b][/u][/color]分母のスライダーn　(たとえば、４から40で増分１）[br]分子のスライダーm（たとえば、1からn-1の増分１）たとえば、アニメーションをOnにする。[br]スタートボタンは「設定」の「スクリプト記述」の「クリックして」に以下のコマンドを入力します。[br]StartAnimation[m][br]停止ボタンは「設定」の「スクリプト記述」の「クリックして」に以下のコマンドを入力します。[br]StartAnimation[false][br][br]次は点列と辺列を「数式」にしましょう。[br][br]・単位円のｎ等分点の点列を「数式」に入力します。[br][b]PList=Sequence(point(cos((360°/n) (i-1)+90°),sin((360°/n) (i-1)+90°)),i,1,n)[br][/b]・多角形の辺列を入力します。[br]点列PListから、始点よりmすすんだ点を終点にし、始点をmずつ増やします。[br]だから、辺の設定は、Segment(Element(PList,Mod(i-1,n)+1),Element(PList,Mod(i-1+m,n)+1))[br]となりますね。[br]一本目はi=１にしたとき、[b]Segment(Element(PList,1),Element(PList,Mod(m,n)+1))[/b][br]二本目はi=1+mから、[b]Segment(Element(PList,Mod(m,n)+1),Element(PList,Mod(m+m,n)+1))[/b][br]三本目はi=1+2mとして、Segment(Element(PList,Mod(2m,n)+1),Element(PList,Mod(3m,n)+1))[br]...........[br]j+1本目はi=1+jmとなり、Segment(Element(PList,Mod(jm,n)+1),Element(PList,Mod((j+1)m,n)+1))[br]...........[br]最大で[br]N本目はi=1+(n-1)mとなり、[br][b]Segment(Element(PList,n-m+1),Element(PList,1))[br][/b]つまり、iを1以上nm以下で公差mで動かせばいいですね。[br][b]Sequence(Segment(Element(PList,Mod(i-1,n)+1),Element(PList,Mod(i-1+m,n)+1)),i,1,n m,m)[br][/b][br]この通りにして作り、点の結び方がわかるように、１，２，３番めの点を表示したものが最初の例でした。説明の必要がないのなら、[br]進む個数、分子のスピードをあげて、スラーダーも非表示にする。[br]そして、等分数、分母の数を大きくして、辺の色をｍ、ｎによって変化するようにすると、[br]さらにわくわくする図形になるかもしれませんね。[br]たとえば、[br]辺列の「設定」で「上級」タブの「動的な色」を以下のように設定することができます。[br]R,G,Bの値は0以上１以下だと予想し、色がかぶらないように20と素な3,7倍して色要素を[br]変動させました。[br][br]赤　Mod(m + n, 20) / 20[br]緑　Mod(7m + 7n, 20) / 20[br]黄　Mod(3m + 3n, 20) / 20[br]RGB[br]この設定で次のようなアートができました。[br][br][color=#9900ff][u][b][size=150]質問：色の設定数式を変えると、どんな色変化になりますか。[br]　時間があるときに遊んでみよう。[br][/size][/b][/u][/color]

[b][size=150]＜よりアートらしく＞[br][/size][/b][br]色の変化は楽しいが、等分点は手動だし、進む数は単調に増減する。[br][color=#9900ff][u][b][size=150]質問：どんな改良ができますか。これを改良してみよう。[br][/size][/b][/u][/color][br]たとえば、NとMの乱数の系列pn, pmを作っておく。[br]スラーダーiをアニメーションにして、N=pn(i), M=pm(i)にすると、[br]分母も分子もランダムに変化するね。[br]また、1系統の多角形だけでなく、分母分子もまったく別系統の多角形を重ねて表示してみる。[br]すると、いっそう複雑で予測しにくい展開になるね。[br]

[b]＜他の環境でも＞[/b][br][br]geogebraは、[color=#0000ff][b]数式が1行ずつしか入力できない[/b][/color]という難点はあるけれど、[br]sequence, Element,zipなどになれると、点列、線分列など、[br][b][color=#0000ff]図形をリストとして簡単にかける[/color][/b]という利点がある。[br]しかし、これに慣れすぎると、便利すぎて他の環境への移植が難しくなることもあるでしょう。[br]そこで、今後のことを考えて、他の言語や環境での実装にも取り組んみよう。[br][br][b][size=150]＜Python＞[br][/size][/b][color=#0000ff]pythonのGUIといえば[b]Tkinter[/b]がある。[br][/color]ほかにも色々あるけれど、[br]基本的な[b]ウィンドウ、キャンバス、座標のロジック[/b]を知るために取り組んでみよう。[br]jupyter notebookの環境を用意しましょう。[br][br]まず、普通のGUIでは座標の原点は画面中央ではなく、画面の左上角にくることが多い。[br]そして、いきなり画面に図はかくことができない。画面の表示能力もあるが、インチ単位で画面の大きさを決める。それから、[b]画面左上角の原点[/b]から、たてよこ半分ずつ進んだ点が画面の中心になる。[br]そこで、画面を1辺SIDE=500の正方形にして[br]ウィンドウの原点から画面の中心までの距離をCENTER_xyに入れます。[br]円の半径r=CENTER_xy-20にして、隙間をあけます。[br]次にウィンドウにキャンバスを貼り付けてパックします。[br]キャンバスに星形多角形を1秒ごとに重ねがきしてます。[br][br][b]drawStar[/b]関数は、かくキャンバスとm,nで動きます。[br]m,nは外で乱数を作ってから読み取るので、大小が逆転してるかもしれないのでm=m%nで[br]mは剰余にします。しかし、割り切れると困るので、m==0のときはm=4とセットします。[br]PListはgeogebraと同じロジックですが、線を結ぶようにiを０かnまで動かしてout of rangeになるのを[br]予防しています。[br]線をかくために、PListから連続する2点のｘｙ座標を与えますが、[b]色はfill = "ff0000"のように８けたの[br]16進数[/b]で設定します。だから、赤２けた、緑２けた、青２けたで[b]16進数に変換した2文字ずつ連結[/b]する[br]という手間がかかっています。[br][b]canvas.create_line[/b](pt1x,pt1y, pt2x,pt2y, fill = "#" + rcolor + gcolor + bcolor, tag="star")[br]これが、1本の線をひくメソッドです。[br][br]そして、更新のための関数が[b]update[/b]()です。[br]この中で毎秒m,nを乱数で4から100の整数にして[br]drawStarを呼び出すことを、[b]root.after[/b]というウィンドウのメソッドで実行してます。[br]geogebraと同様に２つの多角形を重ね書きしては消すというロジックで作ろうとしたのですが、[br]消すロジックを調べる手間がもったいなく、消さずに重ねると[br][b][color=#0000ff]曼荼羅のような鮮やかだか重厚感のあるアートができそうなので、[br][/color][/b]まあ、これもバリエーションということでそのままにしました。[br][br][b][IN]Python[br]#================================================[br][/b]import tkinter as tk[br]from math import cos as cos[br]from math import sin as sin[br]from math import radians as rad[br]import time[br]import random[br][color=#0000ff]# 初期値[br][/color]n = 8[br]m = 3[br]SIDE = 500 # 正方形窓の一辺[br]CENTER_xy = SIDE / 2 # 左上角からはかった中心座標(x,y)のｘとy[br]r = CENTER_xy-20 #単位円を半径ｒ円に拡大する[br][color=#0000ff]# ウィンドウにキャンバスを貼る。[br][/color]root = tk.Tk()[br]root.title("STAR POLYGONS") # タイトル[br]root.geometry(f"{SIDE}x{SIDE}") # 大きさ[br]canvas = tk.Canvas(root, width = SIDE, height = SIDE)[br]canvas.pack()[br][color=#0000ff]#キャンバスに星形多角形を1秒ごとに重ね書きする。 [br][/color]def [b]drawStar[/b](canvas, m,n):[br] m = m % n[br] if m==0:[br] m=4[br] [b]PList[/b]=[(r*cos(rad(360/n * i + 90)) + CENTER_xy, r*sin(rad(360/n * i + 90)) + CENTER_xy) for i in range(n+1)][br] rcolor = f"{5*(m+n) % 256 :02X}"[br] gcolor = f"{7*(m+n) % 256 :02X}"[br] bcolor = f"{3*(m+n) % 256 :02X}"[br] for i in range(0,n*m,m):[br] pt1x,pt1y = PList[i % n][br] pt2x,pt2y = PList[(i+m) % n][br] canvas.create_line(pt1x,pt1y, pt2x,pt2y, fill = "#" + rcolor + gcolor + bcolor, tag="star")[br][b]def update():[br] m = random.randint(4, 100)[br] n = random.randint(20, 100)[br] drawStar(canvas, m, n)[br] root.after(1000, update) # 1秒後に自身を再呼び出し[br][/b]start_time = time.time()[br]update()[br][br][color=#0000ff]# ウィンドウを表示し続ける。[br][/color]root.mainloop()[br]#=====================================================[br][OUT]

[b][size=150]＜Javascript＞[br][/size][/b][br]javascriptにもキャンバスがある。[br]これはHTML5のときにかなり強化されているらしいが、pythonのtkinterと比べてどうだろうか。[br]Qtという言語でもそうだけれど、javascriptでは描画コンテキストというオブジェクトに描画します。[br][br]VScodeなどで、HTMLファイルをかき、その中の＜[b]canvas[/b]＞＜/＞と＜[b]script[/b]＞＜/＞という要素を使いましょう。[br]・canvasは識別子としてのidとサイズとしてのwidth, heightを設定しますが、idはscriptで読み込みます。[br]・scriptでは、canvasで設定したidとコンテキストを２Dとして読み取り、ctxなどの名前をつけて取得しましょう。ctxというオブジェクトの属性やメソッドの設定によって、Webbrowserで開いたときに動作するアプリが作れるのです。[br][br]HTMLのbody→init()→tick()→drawStar()のように、関数をバケツリレーします。[br]ただし、描画コンテキストctxは他の関数でも使うので、scriptの先頭でグローバル変数にして宣言します。[br]init関数の中で、setInterval(tick, 1000); として、[br]1秒ごとに描画をします。[br]javascriptでタプルが扱いにくいので、点の座標をPListのようにｘｙをセットにして作らずに、[br]PListx,PListyと別に作りました。[br]また、飛び越して進むためのfor分の増分式が難しいので、変数iを1ずつ増やして、[br]点のインデックスをmの倍数をnで割った余り i*m%n で指定しています。[br]通常のLineの描画は[br]ctx.moveTo(x0,y0);[br]ctx.lineTo( x1, y1);[br]ctx.stroke();[br]を繰り返します。[br]折れ線Polylineをかくには[br]for文の中に[br]ctx.lineTo( xi, yi);[br]だけをかいて、最後に１回だけ、ctx.stroke();[br]とかけばいですね。[br]たいていのWebbrowserでstar.htmlなどという名前で保存したものを実行できるでしょう。[br][br][IN]==============================================[br]<!DOCTYPE html>[br]<html>[br]  <body onload="init()">[br]  <canvas id="star" width="500" height="500" style="border:1px solid grey"></canvas>[br]  <head>[br]    <script>[br]      //グルーバル変数[br][b]      const canvas = document.getElementById("star");[br]      const ctx = canvas.getContext("2d");[br][/b]      let  m, n;[br]      let SIDE= 500;[br]      let CENTER_xy = SIDE/2;[br]      let r = CENTER_xy-20;[br][br][b]      function rad(kakudo){[br]        return kakudo * 2 * Math.PI / 360;[br]      }[br]      function init() {[br]        setInterval(tick, 1000); //1秒ごとに描画する[br]      }[br][/b]      // 描画の設定[br][b]      function tick() {[br]        let now = new Date(); // 現在時刻から時h、分m、秒sを取得[br]        m = Math.floor(Math.random()*(100 - 4) + 4);[br]        n = Math.floor(Math.random()*(100 - 20) + 20);[br]        drawStar();[br]      }[br][/b]      // 描画の実行[br][b]      function drawStar() {[br][/b]        m = m % n;[br]        let PListx = [];[br]        let PListy = [];[br]        if (m==0){ m= 4;}[br]        for (let i = 0; i < n+1; i++){[br][b]          PListx[i]=r * Math.cos(rad(360/n * i + 90)) + CENTER_xy;[br]          PListy[i]=r * Math.sin(rad(360/n * i + 90)) + CENTER_xy;[br][/b]        }[br]        ctx.lineWidth = 1;[br]        let rgbcolor = Math.random().toString(16).slice(-8)[br]        ctx.strokeStyle = "#"+rgbcolor;[br]        ctx.beginPath();[br]        for (let i = 0; i < n+1 ; i++)[br]        {[br][b]            let idx = i*m % n[br]            ctx.lineTo(PListx[idx], PListy[idx]);[br][/b]        }[br]        ctx.stroke();[br]        }[br]    </script>[br]  </head>[br]  </body>[br]</html>