一辺の長さ1の正五角形の頂点を全て結ぶ分岐あり曲線の長さの最小値を求めよ ->画像>22枚

面白い問題おしえて〜な26問目よりつづきです。

問題がわからんぞ。

５でないと？

前>>1
カブトガニのような境界線3.89……より小さな値にならないかと長い2つの縦線を内側に傾け、将棋の駒のような領域を作ってみた。依然、左右対称ですが。
2(√5-1)+1/√3+(√5-1)cos66°/√3+√{(5-√5)/2}
=3.04948622-0.71364418×0.406736643+√1.381966012
=3.93497149……
ぉしい!!
4は切った。

分岐の角を１２０℃にすれば良い。そんだけだな。

3つの境界線が120°で交わるように作図すると、五角形の内角の和は540°だから、3つの内角を120°にすると、
540°-120°×3=180°
左右対称ならやはり底辺と境界線のなす角は90°になる。カブトガニのような前スレの境界線になる。

左右対称じゃない境界線で、3.891156823を下回ることは可能なのか？　前>>3

120度の点なんとか点だっけ
頂点5つもあったら一意的かい？

前>>5
正五角形の中に分岐点は3つとして、
長さ0.55のジグ7つのうち、5つの片方の端を正五角形の頂点につなぎ、他方を分岐点につなぐ。
あとジグ2つは分岐点と分岐点をつなぐ。
もしもすべてのジグがつなげられるなら、
最小値 0.55×7=3.85

前>>7 正五角形の頂点と中心の距離をrとすると、
r+√{r^2-(1/2)^2}=√[{(1+√5)/2}^2-(1/2)^2]
=√{(5+2√5)/4}
r^2-1/4=(5+2√5)/4-r√(5+2√5)+r^2
r√(5+2√5)=(6+2√5)/4
=(3+√5)/2
r=(3+√5)/2√(5+2√5)
(=5.2360679/6.155367)
≒0.8506508
境界線を3つの分岐点を持つ7つの同じ長さxの線分のつらなりとして、境界線の長さf(x)=7xの値も一意に決まらないか。最小かどうかはともかく、x=3.89……より小さくならないか。ピタゴラスの定理で。

前>>8
底辺1を水平に置く。
分岐点の高さ(低い方2つ)をaとする。
正五角形の高さ=√[{(1+√5)/2}-(1/4)]
=√{(5+2√5)/4}
対角線の高さ=√{(5+2√5)/4}-√[1-{(1+√5)/4}^2]
=(1/4){√(20+8√5)-√(10-2√5)}
総面積=(1/4)√(25+10√5)=√{x^2-(1/4)}+台形a{1-√(x^2-a^2)}+盃型台形(1/2)[{(1+√5)/2}+1-2√(x^2-a^2)](1/4){√(20+8√5)-√(10-2√5)}/2+三角形(1/2){(1+√5)/2}√[1-{(1+√5)/4}^2]――�@
対角線の長さ=(1+√5)/2=1-2√(x^2-a^2)+2√〔(x^2-[(1/4){√(20+8√5)-√(10-2√5)}-a]^2〕――�A
未知数2つ(aとx)、式2つ(�@と�A)より、aは消去できないか。あるいはxの最小値、
x=3.8……
が出ないか。

左右対称じゃない、根拠とかヒントとかなにかないの？　前>>9

http://book-sp.kodansha.co.jp/pdf/20180704_utsukushiikao.pdf前>>10

前スレ26の979によると、左右非対称で最小値をとるってことですね。だれも触れようとしないけど、左右非対称の意味がわかれば解けるわけですね。

http://www.kyodemo.net/demo/r/math/1518967270/979前>>11URLが違ったみたい。

左右非対称でも分岐点の角度は120°になりますか？

>>2問題をスレのタイトルにしました。頂点5つを辺4つで結ぶと4なんで、最小値は4より小さい値です。前>>12それはわかったんですが、左右対称で3.89……よりも小さくなる左右非対称な曲線(折れ線だと思うけど)がわかりません。それが面白いんですが。
正七角形だとまわりを通って6でいいみたい。

前>>13カブトガニよりシオマネキのほうが小さいと思って計算しておっきなったんであきらめてましたが、計算しなおしました。

一辺(長さ1)だけ外周(蟹のハサミ)という考えです。
正五角形の対角線と正六角形を二分する線が一致するように正五角形内部に正六角形の半分を描くように分割線を書くと、分岐点と頂点を結ぶ線分の長さは(対角線の半分)か(1-対角線の半分)のどちらかになる。
分岐点と分岐点の距離は(対角線の半分)。
4つの頂点を結ぶ曲線(シオマネキ)
=1+(黄金比対角線の半分)×3+(1-黄金比対角線の半分)×2
=1+{(1+√5)/4}×3+{1-(1+√5)/4}×2
=1+(3/4)(1+√5)+(1/2)(3-√5)
=(13+√5)/4
=3.8090167……

シオマネキ、最小!!

[27問目.059]

分岐点と頂点を結ぶ線分の短い方の長さは（1−対角線の長さ）にはなりませんよ。
A = 分岐点と頂点を結ぶ線分の長い方
B = 分岐点と頂点を結ぶ線分の短い方
C = 正五角形の一辺
とすると
AとCの挟角が 12ﾟってことが分かる。（後略

[27問目.62-63]

正五角形を P1-P2-P3-P4-P5
正六角形の半分を P1-Q2-Q3-P4 とする。

分岐点の角ぜんぶが 120ﾟ にはなっていない。

A は対角線 P1-P4 の半分で
　A = 1/{4sin(18ﾟ)} = (1+√5)/4 = 0.809016994374947424102293417182819
P2-Q2，P3-Q3 は は第二余弦定理から
　B = √{AA+CC-2AC･cos(12ﾟ)} = 0.2680157330941872201843362931855557
辺 P1-P2-P3-P4 は
　C = 1
∴　ネットワークの長さは
　3A + 2B + C = 3.96308244931321671267555283792 < 4

左右非対称とかいう説もあるが、未確認。暫定解は

[27問目.22]
3.891156823326853818078262556719905049852981445670139299627728956

詳細は↓

正五角形のシュタイナー木

シュタイナーツリーって概念があるのか。
前>>14イナ主体な。
左右非対称だというヒントに従ったまでだ。
出題者だと思うが、それでいいとかそこまでとかなんとか言ってほしい。
(13+√5)/4=0.8090167……
これが最小値なんだろ？

前>>20訂正。
(13+√5)/4=3.8090167……

出題者にそれでいいって求めるって何www
そこまでが数学やろ？www

シオマネキ型も計算してみたんだけどね・・・ちっとも最小にはならんかったんよ。

>>23胴体部分の3つの線分それぞれを正六角形の一辺にすることはできないのですか？　正六角形は内角が120°で辺の長さはすべて同じです。

正五角形の対角線の半分
=(1+√5)/4
=0.8090169……
前>>21

>>24
だからそうすると
短い方の辺と正六角形とのなす角が120°にならないって散々指摘されてんだろ

だいたい1-対角線の長さってどっから出てきた湧き出てきた計算なんだよ

＞短い方の辺と正六角形とのなす角が120°にならない
まあそういうことだね

>>25
1-対角線の長さじゃないです。
1-(対角線の半分)です。

=1-{対角線(1+√5)/2}×(1/2)
引き算より掛け算を優先する、四則計算のルール。
=1-(1+√5)/4
=(3-√5)/4
>>26その図を描きました。手書きで、左右逆にしましたが、まさにこういう図です。長さはすべて分数のまま式を変形し、最後に電卓で確認しましたが、こんな値だと思います。
分岐点の角度は120°です。右上の頂点の内角108°のうち水平な五角形の対角線より上の角度が36°で、正六角形の半分が60°で、残りの鋭角が12°です。
右下の頂点の内角108°を48°と60°に分ける短い線が引けます。
前>>24矛盾ないと思いますが。

無駄な努力をするスレ

>>27
＞右下の頂点の内角108°を48°と60°に分ける短い線が引けます。
ここが誤りなのよ。

角度を計算するとおおよそ39°と69°
短い線と分岐点同士の距離との和は１より少し大きい。

結果、残念ながらこのシオマネキは最小にならない。

左右の三角形の二辺の長さの和がもう一辺の長さに等しいなんてありえない。

幾何の問題をやるときに、手書きで書いた図から大雑把に見積もった角度を信じて計算を進めるのはやめたほうがいいな

>>29
右側の三角形で、
右上の角度は、
108°-36°-60°=12°
右下の角度は、
180°-120°-12°=48°
正五角形下方の等脚台形の右下の角度は、
108°-48°=60°
等脚台形の中に、短い線を一辺とする正三角形が描けると思うんですが。
前>>27

>>32
その角が120°という根拠はない。
そこまで頑なに120°と言い張るなら、ぜひとも証明してみなさいな。

流れ追えてないんですけど、シオマネキが最小出ない根拠は何ですか？

自ら隔離スレを立てるあたり、自覚症状はあるのかと思ったが、
スレをたてるほどの話はそこにはないことを理解できていないだけだった。

そもそも出題者の答えとおぼしき物が出てるけど？？
http://2chb.net/r/math/1532793672/64

>>36
それはどう見ても>>17 >>18と同一人物で、左右非対称とか口走ったのが出題者なら別人だろ。
そもそも、数学の問題で出題者がだれとか、どおっでもいいじゃん。
何が正解か出題者にしか判断できないなら、出題者が間違ったことを言ったらそれが正解になるのか？
この問題はどこからどうみても>>18が正解で、それで話は終わりだろ。

3.89……なら、左右非対称のヒントが出る前に出てる値と同じだよ。前>>32


3.89……を下回る値を探してるんじゃないの？

分岐点2つの位置を水平拘らずうまくとって分岐120°を保ったまま正五角形の適当な近場の辺に分岐した先を入射させることができれば、あるいは3.89……を下回るかもしれないね。
前>>38

内点のなす角は必ず１２０°で内点の可能性は１，２，３しかないからそもそもそんなに可能性ないやん。

・内点一個Pならその一点とつながってる３点は外点でPはその３点のFermat Centerでその３点のなす三角形は鋭角三角形。その選び方は実質一意。
このときグラフの長さの合計は5.875016491602415。
またこの議論から内点のなすグラフの連結成分が一点のみのグラフを含めば他の内点は持てないとわかる。
・内点二個,PQとする。
前ケースの議論からPQはつながっておりPQとつながっている４点は外点。
その選び方は実質一意。
このときグラフの長さの合計は3.956295201467611。
・内点三個,PQRとする。
前々ケースの議論からPQRはつながっておりそのなすグラフはA_3。
P,Qは２外点とつながり、Rは１外点とつながっているとする。
P,Qとつながっている２外点は隣接せねばならず、よってその選び方は実質一意。
このときグラフの長さの合計は3.891156823326854。

これでいいんじゃないの？

>>40
いや、与えられたいくつかの点を結ぶ最短ネットワークの局所最適解の頂点は、
全部120°の三叉路か、120°以上の折れ線（ただし、その頂点自体が通るべき点）しか
ありえないのだから、最初から３番目のケースに限定されるでしょ。
正五角形と正七角形で状況が違うのは、正七角形は内角が120°より大きいから
六辺をつないだ折れ線が局所最適解になりうるという点。
正五角形では、元々の辺は局所最適解には含まれない。

>>41
わかってる人はわかってると思うが、
＞全部120°の三叉路か、120°以上の折れ線（ただし、その頂点自体が通るべき点）しか
＞ありえない
ことの理由は、そうでないような頂点があれば、その周辺を少し変形することで
必ずそれよりも短い解が作れるから。

そう。だから120°に限られるのは自由に動かせる内点のみで固定点である正五角形のとこでは成立しないから固定点の配置によってはそこで１２０°以外も現れうる。

最小解において、曲線が正五角形の(頂点以外の)周を通らないことは証明できる？

自由店では三股になっていないといけない。
よって最小解の凸包の頂点は全て固定点。

何の話がなされているか理解できないスレ主が、元スレに戻ってやがる…。

クソコテの脳内
「なにをゆってるのかわからないけどぼくのまちがいをしてきしようとするひとわぼくをいぢめようとしているひとなのでむししてもいいよね」

やっと平和になった。
そう言えば、きのうは広島で平和祈念式だったな。

昨日までの暑さがうそみたいに涼しいね。前>>39カブトガニ型の左右対称な分岐点3つの経路の値を確認した。
(斜め線4つ)=(1+√5)/2×(2/√3)
=(1+√5)/√3
(短い縦線)=(正五角形の高さ)-(中央と左右の分岐点の水平距離)(1/√3)-(長い縦線)
=√[{(1+√5)/2}^2-(1/2)^2}]-1/2√3-(長い縦線)
(長い縦線)=(左右の頂点の高さ)-(左右の頂点と左右のの分岐点の水平距離)×(1/√3)
=√[1-{(1+√5)/4 -(1/2)}^2]-{(1+√5)/4 -(1/2)}(1/√3)
=(1/4)√(10+2√5)-(√5-1)/4√3
(最小値)=(1+√5)/√3+(1/2)√(5+2√5)-1/2√3+(1/4)√(10+2√5)-(√5-1)/4√3
=(1+2√5)/2√3+(1-√5)/4√3+(1/4)2√(5+2√5)+(1/4)√(10+2√5)
=(1/4){2√(5+2√5)+√(10+2√5)+(1+√5)√3}
≒(1/4)(6.15536707+3.80422607+5.60503415)
=3.8911568225

>>47
　長崎はきょうです。。。

雨だね。

〔次の問題〕
周の長さが一定の四角形（長方形以外も含む）はどうしたら面積が最大になるの？
http://2chb.net/r/math/1482158333/

;;;;;;;;人;;;;;;;;;;;
;;;;;;;(＿);;;;;;;;;;
;;;;;;(＿)_)､;;;;;;;;
;;;;;(_)＿)_))､;;;;;;;
;;;;(_(＿)_)_)_);;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;>>52四辺が同じ長さのとき。前>>50 ５月５日はこどもの日だろ。６月４日は虫歯予防デー。わかるら。

>イナ
こいつには証明という概念はないの？

>>52

それはわかってるんですよ。基本資料だから読んでないわけがない。そのページの２ 標準偏差（２SD）って具体的にどんな数値を入れて計算するのかを聴いているんです。

五角形の中心と各頂点を結ぶ放射状の線だと題意をみたさないのか？

のシオマネキのハサミを覗いた部分は左右対称と仮定。
５角形の底辺の中点を原点として右側の三差路の交差点の座標を(x,y)として
コンピューターに最小値を算出させてみた。
座標 (0.3799888 0.2080354)で 最長値は3.956295と出てきた。

> optim(c(0.4,0.4),sio,method='Nelder-Mead')
$`par`
[1] 0.3799888 0.2080354

$value
[1] 3.956295

$counts
function gradient
45 NA

$convergence
[1] 0

$message
NULL

カブトガニでもやってみた

> optim(c(1,0.5),kab, method = 'Nelder-Mead')
$`par`
[1] 1.0614192 0.7726595

$value
[1] 3.891157

$counts
function gradient
57 NA

$convergence
[1] 0

$message
NULL

>>57
最長値は3.956295と出てきた。→最小値は3.956295と出てきた。

>>57
Rのソースはこれ

http://2chb.net/r/hosp/1493809494/614

>>58
表示桁を増やしてみた。

> optim(c(1,0.5),kab, method = 'Nelder-Mead')
$`par`
[1] 1.0614192103443205 0.7726595158193953

$value
[1] 3.891156833029388

$counts
function gradient
57 NA

$convergence
[1] 0

$message
NULL


　

底辺の中点を原点において

真ん中の交差点の（０，ｙ１）、右側の交差点が（０．５、ｙ２）としたとき

y1=1.0614192103443205 y2=0.7726595158193953

で　最小値が 3.891156833029388

というのがコンピュータでの結論。

等高線をグラフ化してみた。

左右非対称解とは結局何だったのか

>>62
min(カブトカニ形)　＜　min(シオマネキ形)はいえるけど
カブトカニ形より小さい解がないと言えるんだろうか？

言えてる。もう証明も上がってる。

前>>53前々>>48カブトガニ最小=3.8911568225
分岐点2つの距離をxとおくと、
シオマネキ最小=1+{(1+√5)/2-x}×2+(1-x)×2+x
=4+√5-3x――�@
斜辺1で三平方の定理。
√[1^2-{(1+√5)/2-1}^2･(1/2)^2]={(1+√5)/2-x}(√3)/2+(1-x)(√3)/2
これを解いて、
x={3√3+√15-√(10+2√5)}/4√3
�Aを�@に代入。
シオマネキ最小=4+√5-{9+3√5-(√3)√(10+2√5)}/4
={7+√5+√(30+6√5)}/4
=3.9562341＞カブトガニ最小

この期に及んでまだわかってないんだな。

前>>65加筆。
>>48カブトガニ最小=3.8911568225と同様、シオマネキ最小についても作図により式を立て、パソコンなどに一任することなく、中学生がわかる程度の計算によって示したいと思う。
分岐点2つの距離をxとおくと、
シオマネキ最小=1+{(1+√5)/2-x}×2+(1-x)×2+x
=4+√5-3x――�@
斜辺1で三平方の定理。
√[1^2-{(1+√5)/2-1}^2･(1/2)^2]={(1+√5)/2-x}(√3)/2+(1-x)(√3)/2
これを解いて、
x={3√3+√15-√(10+2√5)}/4√3――�A
�Aを�@に代入。
シオマネキ最小=4+√5-{9+3√5-(√3)√(10+2√5)}/4
={7+√5+√(30+6√5)}/4
=3.9562341＞カブトガニ最小

そこじゃないんだよなぁ。
それでいいん？君の数学はそのレベルで終わりでいいん？

>>68ビジュアル八面体みたいに120°じゃない極値があるってのかい？　前>>67


カブトガニ最小=3.8911568225

シオマネキ最小=3.9562341
0.555……×7=3.888……

ホントにわかってないんだなぁ。
>>63が何を疑問に思ってるのかすら君一人だけわかってないんだなぁ。

前>>69仮説。

シオマネキ最小＞カブトガニ最小＞分岐線の最小=35/9=3.888……

前>>71
小さい蠏。

>>71
最小解があると言うなら、その解を図示するか、または座標を示してみないかい？

>>71最小値に座標は関係ない。前後左右どうまわしても最小値になるときはなる。分岐線の長さxとおくと、最小値は7x。前>>72でももう疲れた。カブトガニが最小の蠏かもね。

分岐の角度を120°に保ちながらカブトガニより小さくならないかな。
もしなるならピタゴラス。xとyの二次式から四次式ぐらいで抑えないときついよ、ピタゴラス。寝冷えだ。

>>74
ふうん。そう。
おやすみ。おだいじに。

なんの意味もないスレ

高添沼田（葛飾区青戸6−２３−２１ハイツニュー青戸103号室）の挑発
高添沼田の親父「関東連合文句があったらいつでも孫を金属バットで殴り殺しに来やがれっ!!　関東連合の糞野郎どもは俺様がぶちのめしてやるぜっ!! 賞金をやるからいつでもかかって来いっ!!糞バエ関東連合どもっ!! 待ってるぜっ!!」 (挑戦状)

のように左右対称を前提とせず、カブトガニ形の繋がりのネットワークを対象として
コンピュータで長さが最小となる座標を出して描出させてみた。
つまり変数６個で計算。
> kabu3(opt$par)
[1] 3.891156823335537
> (par=opt$par)
[1] 0.000002699127792359672 0.772642997991326407892 0.500000462950937363260
[4] 1.061317339518144553523 0.999998560151592941203 0.772643514290974220415
Rのコードはここ
http://2chb.net/r/hosp/1493809494/621
この座標で描画すると

>>78
この試行はやってみたことある
まずランダムに３点をとって、その３点でできる三角形の短い方から２辺と、元の正五角形の各頂点から、３点のうち最も近い点とを結んでそれら７本の長さを合計する
それから３点を少しずつ動かして極小解を探していく

結果はカブトガニ型に収束するか、４より大きな解になるか、または収束しない
シミュレーションだから最適化できているかは不明だが、カブトガニ解より小さな解はこれまで見つかっていない

>>79
レスありがとう。
>78は座標の取りうる値に制限をつけてないので
ネットワークが重なるようなのも対象にして算出している。

>78の最小値の最適解算出の初期値は
０〜１の一様分布でランダムに設定したけれど

のような五角形外から始めても左右対称のカブトガニに収束した。

> optim(runif(6,-1,2),kabu3,method='CG')
$`par`
[1] -0.0000006244007777030901 0.7726459096103870383132 0.5000003027472189609526
[4] 1.0613226509328328450721 1.0000013550880015866795 0.7726459944754771047570

$value
[1] 3.891156823329757

お墓参りに来ますた。南無阿弥陀仏。
（まだ生きていたとは…）

>79

>まずランダムに３点をとって
５角形の頂点をp1〜p5として分岐点をq1〜q5の５点に増やして
p1-q1,p2-q2,p3-q3,p4-q4,p5-q5とq1-q2,q2-q3,q3-q4,q4-q5の長さの合計を
最小値とする座標を計算させてみた。
明らかに最小でない、こういうの候補と


最小とするパラメータ
> (opt=optim(runif(10),penta,method = 'CG'))
$`par`
[1] 1.0000004341739945346035 1.0000008344836242013542 0.4999996331498277601924
[4] 0.0000003625715489940964 0.0000001533897055299300 0.4058822346805296410466
[7] 0.7726451907010785102869 1.0613213678038868614806 0.7726454972413701050016
[10] 0.3769465135213049822305

$value
[1] 3.89115682332915

これで描画すると

p1,q1,q2が一直線、p5,q5,q4も一直線で
分岐３点のカブトガニに収束した。

>>83
R の　コードはここに置いた
http://2chb.net/r/hosp/1533510399/451-452

>>83
×こういうの候補と
〇こういうの候補を含めて

>>85
→こういう候補を含めて

>>83
分岐点５点設定でも３分岐点に収束するのだから
３分岐点は２分岐に収束しないのでカブトガニ最小が濃厚だな。

７角形でこういうモデルのとき　
の最適解をコンピューターで算出してみた。

Rのコードはこれ

rm(list=ls())
n=7
ngon <- function(n,digit=TRUE,axis=FALSE,cex=1,...){ # draw n-polygon
r=exp(2*pi/n*1i)
p=complex(n)
for(i in 1:(n+1)) p[i]= (1-r^i)/(1-r)
plot(p,bty='l',type='l',axes=axis, ann=FALSE,asp=1,...)
points(1/(1-r),pch='.')
if(digit) text(Re(p),Im(p),paste('p',1:n),cex=cex)
if(axis){axis(1) ; axis(2)}
invisible(p)} # return vertex complex
seg <- function(a,b,...){# draw segment of complex a to complex b
segments(Re(a),Im(a),Re(b),Im(b),col=2,...)}
pt <- function(x,y=NULL,...){ # draw text y at complex x
text(Re(x),Im(x), ifelse(is.null(y),'+',y), ...)}
poly_demo <- function(x=runif(n),y=runif(n)){ # draw segments
graphics.off()
p=ngon(n,axis=T,col='skyblue')
Q=complex(n)
re1=re2=0
for(i in 1:n){
Q[i]=x[i]+y[i]*1i
pt(Q[i],paste('q',i))
seg(p[i],Q[i])
re1=re1+abs(p[i]-Q[i])
}
for(i in 1:(n-1)){
seg(Q[i],Q[i+1])
re2=re2+abs(Q[i]-Q[i+1])
}
return(sum(re1)+sum(re2))}
poly_demo()
p=ngon(n,axis=T,col='skyblue')
poly <- function(par){
x=par[1:n]
y=par[(n+1):(2*n)]
Q=complex(n)
re1=re2=0
for(i in 1:n){
Q[i]=x[i]+y[i]*1i
re1=re1+abs(p[i]-Q[i])}
for(i in 1:(n-1)){
re2=re2+abs(Q[i]-Q[i+1])}
return(sum(re1)+sum(re2))}

(opt=optim(runif(2*n),poly,method = 'CG'))
par=opt$par
ngon(n,axis=T,col='skyblue')
poly_demo(par[1:n],par[(n+1):(2*n)])

#　各頂点から最も近い分岐点を選んで結ぶモデル
rm(list=ls()) ; graphics.off()
# draw n-polygon
ngon <- function(n,print=TRUE,digit=TRUE,axis=FALSE,cex=1,...){
r=exp(2*pi/n*1i)
p=complex(n)
for(i in 1:(n+1)) p[i]= (1-r^i)/(1-r)
if(print){
plot(p,bty='l',type='l',axes=axis, ann=FALSE,asp=1,...)
points(1/(1-r),pch='.')
if(digit) text(Re(p),Im(p),paste('p',1:n),cex=cex)
if(axis){axis(1) ; axis(2)}}
invisible(p) # return vertex complex
}
# draw segment of complex a to complex b
seg <- function(a,b,...){
segments(Re(a),Im(a),Re(b),Im(b),col=2,...)
}
# draw text y at complex x
pt <- function(x,y=NULL,...){
text(Re(x),Im(x), ifelse(is.null(y),'+',y), ...)
}

各頂点からｍ個の分岐点のうち最も近い分岐点を選んで結ぶというモデルにアルゴリズムを変更してみた。
初期値は多角形に外接する正方形の座標を一様分布で選んで、分岐線の長さが最小になる値を
コンピュータに探索させた。
ｍ＝１は警視庁
ｍ＝２はカメムシ
ｍ＝３はカブトガニ
ｍ以上はカブトガニが最小になったが、初期値によっては時々、カメムシが出てきた。
ｍ＝４
ｍ＝５
ｍ＝６
ｍ＝７
ｍ＝８

ちなみに６角形以上では多角形の辺を結ぶ分岐線が最小になって味気ない。

ｍ以上、→　３以上、

３角形から８角形までコンピュータに探索させてみた。

>>89
ソース全文はココ
http://egg.2ch.net/test/read.cgi/hosp/1493809494/635-638

【新定理】辺の長さが全て整数となる直角三角形と二等辺三角形の組の中には、周の長さも面積も共に等しい組が(相似を除き)1組だけ [485983549]
http://2chb.net/r/poverty/1536987574/

シャボン液を使ったら膜が動いて極小を示せるか？
最小の証明にはならんが

定規とコンパスにより正五角形を作図する方法

ARを直径とする円Xを描く。
これに内接する正五角形 ABCDEA を作図しよう。
　A (-1, 0)
　C (cos(36), sin(36))
　D (cos(36), -sin(36))
　R (1, 0)
　T (1/2, 0)
とする。
第二余弦定理より
　CT^2 = 1 + 1/4 - cos(36) = 5/4 - φ/2 = 5/4 - 29/36 = 4/9,
　CT = DT = 2/3,

直径ARの4等分点Tを中心とし、ARの1/3を半径とする円Yを描く。
円X と 円Y の交点を C および D とする。
ACの垂直2等分線と円Xの交点を B とする。
ADの垂直2等分線と円Xの交点を E とする。
　弦AB = BC = CD = DE = EA,　(終)

http://suseum.jp/gq/question/3233