Excel で 外接球半径

Excel 多面体 諸量

前回
一つの頂でてきる 多角錐から 諸量計算が簡単にできる多面体は多くあります。
と言いました。
以下に Excel での計算を 載せておきます。
[3,3,3,3,4] [3,3,3,3,5] [4,6,8] [4,6,10] は 保留します。
[3,4,5,4] は 式が複雑になってしまって 簡単ではありませんでした。
それらは パズル気分で 処理する Excel や
一般解を求める BASIC で処理したほうが得策のようです。

色付けした全範囲を指定し 1 行目 A 列に copy and paste
角数側角度(R)かど開き寸/2かど開き寸
3=PI()/B2=COS(C2)=D2*2
4=PI()/B3=COS(C3)=D3*2
5=PI()/B4=COS(C4)=D4*2
6=PI()/B5=COS(C5)=D5*2
8=PI()/B6=COS(C6)=D6*2
10=PI()/B7=COS(C7)=D7*2
かど・中心寸頂・底心寸外接球半径
1[3,3,3]=(SQRT(3)/2)/3*2=SQRT(1-C10^2)=0.5/D10
2[3,3,3,3]=1/SQRT(2)=SQRT(1-C11^2)=0.5/D11
3[4,4,4]=SQRT(2)*(SQRT(3)/2)/3*2=SQRT(1-C12^2)=0.5/D12
4[3,3,3,3,3]=0.5/SIN(PI()/5)=SQRT(1-C13^2)=0.5/D13
5[3,4,3,4]=SQRT(1+E3^2)/2=SQRT(1-C14^2)=0.5/D14
6[3,6,6]=E5/SQRT(E5^2-D2^2)*D5=SQRT(1-C15^2)=0.5/D15
7[3,3,3,3,4]
8[3,4,4,4]=(0.5*E3)/COS(ACOS(((E3-1)/2)/E3)/2)=SQRT(1-C17^2)=0.5/D17
9[5,5,5]=E4*SQRT(3)/2/3*2=SQRT(1-C18^2)=0.5/D18
10[4,6,6]=E5/SQRT(E5^2-D3^2)*D5=SQRT(1-C19^2)=0.5/D19
11[3,5,3,5]=SQRT(1+E4^2)/2=SQRT(1-C20^2)=0.5/D20
12[3,8,8]=E6/SQRT(E6^2-D2^2)*D6=SQRT(1-C21^2)=0.5/D21
13[3,3,3,3,5]
14[3,4,5,4]
15[4,6,8]
16[5,6,6]=E5/SQRT(E5^2-D4^2)*D5=SQRT(1-C25^2)=0.5/D25
17[3,10,10]=E7/SQRT(E7^2-D2^2)*D7=SQRT(1-C26^2)=0.5/D26
18[4,6,10]
以下のような 表示になります。
角数側角度(R)かど開き寸/2かど開き寸
31.04719755119660.51
40.7853981633974480.7071067811865481.4142135623731
50.6283185307179590.8090169943749471.61803398874989
60.5235987755982990.8660254037844391.73205080756888
80.3926990816987240.9238795325112871.84775906502257
100.3141592653589790.9510565162951541.90211303259031
かど・中心寸頂・底心寸外接球半径
1[3,3,3]0.5773502691896260.8164965809277260.612372435695794
2[3,3,3,3]0.7071067811865470.7071067811865480.707106781186547
3[4,4,4]0.8164965809277260.5773502691896260.866025403784439
4[3,3,3,3,3]0.850650808352040.5257311121191340.951056516295153
5[3,4,3,4]0.8660254037844390.51
6[3,6,6]0.9045340337332910.4264014327112211.17260393995586
7[3,3,3,3,4]
8[3,4,4,4]0.9339488310944650.3574067443365931.39896632596591
9[5,5,5]0.9341723589627160.356822089773091.40125853844407
10[4,6,6]0.9486832980505140.3162277660168381.58113883008419
11[3,5,3,5]0.9510565162951540.3090169943749481.61803398874989
12[3,8,8]0.9596829822606670.281084637714821.77882364566393
13[3,3,3,3,5]
14[3,4,5,4]
15[4,6,8]
16[5,6,6]0.9794320854864140.2017741061675992.47801865906762
17[3,10,10]0.9857219192813020.1683814058867152.96944901586339
18[4,6,10]


« »