惑星直列

 太陽系の地球を除く惑星を一直線上に隙間なく並べると，ちょうど地球−月の距離と等しくなるという話を見かけたので確かめてみた。

地球を除く7惑星の直径 [km] は，{水星，金星，火星，木星，土星，天王星，海王星}={4879.4, 12103.6, 6794.4, 142984.0, 120536.0, 51118.0, 49528.0}となる。また，地球−月の平均公転半径 [km]は，388440.0 である。

Mathematicaで次のコードを実行する。

d = {4879.4, 12103.6, 6794.4, 142984.0, 120536.0, 51118.0, 49528.0}
r = Table[Sum[d[[i]], {i, 1, k}] - d[[k]]/2, {k, 1, 7}]
g1 = Graphics[{Circle[{384400/2, 0}, 384400/2, {11 Pi/12, 13 Pi/12}], 
   Circle[{384400/2, 0}, 384400/2, {-Pi/12, Pi/12}]}]
g2 = Graphics[Table[Circle[{r[[k]], 0}, d[[k]]/2], {k, 1, 7}]]
g3 = Graphics[Table[Circle[{r[[k]] - d[[1]], 0}, d[[k]]/2], {k, 2, 7}]]
Show[g1,g2]
Show[g1,g3]

水星をふくめると公転半径から少しはみ出すが，水星を除けばすっぽりとおさまった。

図：地球−月の公転軌道半径と７惑星の直列配置