AstroDistance[astro]
ユーザの地理位置から現在観測されている天体 astro までの物理的距離を返す.
AstroDistance[astro,astro0]
astro0から現在観測されている天体 astro までの物理的距離を返す.
AstroDistance[astro,Dated[astro0,date]]
指定された日付に astro0から観測された astro までの物理的距離を返す.
AstroDistance
AstroDistance[astro]
ユーザの地理位置から現在観測されている天体 astro までの物理的距離を返す.
AstroDistance[astro,astro0]
astro0から現在観測されている天体 astro までの物理的距離を返す.
AstroDistance[astro,Dated[astro0,date]]
指定された日付に astro0から観測された astro までの物理的距離を返す.
詳細
- AstroDistanceは,天体の中心や天球上の点のように空間を移動する特定の位置間の距離を計算する.
- AstroDistance[astro1,astro0]の天体は天体の中心を表すEntity["Planet","Mars"]のような天文学実体として,あるいはGeoPosition[{lat,lon,h},"Mars"]やEntity["SolarSystemFeature", "OlympusMonsMars"]のように天体の表面を参照する位置として,与えられる."JupiterBarycenter"のように物理的な位置を表す文字列も使うことができる.
- AstroDistance[astro,astro0]の観測位置 astro0は太陽系内の位置でなければならないが,標的位置 astro は恒星や銀河のような深天のオブジェクトでもよい.
- 観測の瞬間は,太陽系のBCRS座標で,AstroDistanceの第2引数によって決定され,デフォルトでは現在の瞬間であると解釈される.
- AstroDistance[astro,astro0]では,太陽系外の astro オブジェクトについては,結果は常に天文学的,つまり,観測日に astro があった場所ではなく,光が放射された場所までの距離を与える光時間補正が行われる.
- AstroDistance[astro,astro0]では,太陽系内の astro オブジェクトについては,結果はデフォルトで光時間補正が行われるが,AstroDistance[astro,{astro0,"LightTime""Geometric"}]を使うと幾何学的にできる.
例題
すべて開く すべて閉じる例 (3)
AstroDistance[Entity["Planet", "Venus"]]AstroDistance[Entity["Planet", "Venus"], GeoPosition[{0, 0}, Entity["PlanetaryMoon", "Moon"]]]2015年から2030年までの木星と地球の中心間の距離をプロットする:
Plot[AstroDistance[Entity["Planet", "Jupiter"], Dated[Entity["Planet", "Earth"], year]], {year, 2015, 2030}]スコープ (5)
現在の火星の中心から観測される木星の中心までの距離を求める:
AstroDistance[Entity["Planet", "Jupiter"], Dated[Entity["Planet", "Mars"], Now]]AstroDistance[Entity["Planet", "Jupiter"], {Entity["Planet", "Mars"], Now}]AstroDistance[Entity["Planet", "Jupiter"], {Now, Entity["Planet", "Mars"]}]AstroDistance[Entity["Planet", "Jupiter"], GeoPosition[{40, 30}, Entity["Planet", "Venus"]]]UnitConvert[% - AstroDistance[Entity["Planet", "Jupiter"], Entity["Planet", "Venus"]], "Miles"]Entity["Planet", "Venus"]["Radius"]AstroDistance[Entity["SolarSystemFeature", "OlympusMonsMars"], Entity["City", {"Paris", "IleDeFrance", "France"}]]AstroDistance[Entity["Star", "Sun"], "SolarSystemBarycenter"]次の100年間の距離をギガメートル,つまり百万キロメートル単位で計算する:
Plot[AstroDistance[Entity["Star", "Sun"], Dated["SolarSystemBarycenter", DateObject[{year}, "Instant", "GregorianYear", 0]]], {year, 0, 100}, TargetUnits -> "Gigameters"]EntityClass["PlanetaryMoon", "GalileanMoon"]//EntityList結果はQuantityArray形式で与えられる:
AstroDistance[%]Normalを使ってQuantity距離のリストに変換する:
%//Normalアプリケーション (4)
指定されたグレゴリオ年における木星の中心と地球の中心間の地理的距離を計算する関数を構築する:
date[year_] := DateObject[{year}, CalendarType -> "GregorianYear"];
dJE[year_ ? NumericQ] := AstroDistance[Entity["Planet", "Jupiter"], {Entity["Planet", "Earth"], date[year], "LightTime" -> "Geometric"}]Plot[dJE[year], {year, 2020, 2026}]FindMinimum[QuantityMagnitude[dJE[year]], {year, 2022.5, 2022, 2023}]date[year] /. Last[%]CalendarConvert[%]次は2022年のある日 d における地球から太陽までの距離である:
dES[d_ ? NumericQ] := AstroDistance[Entity["Planet", "Earth"], {Entity["Star", "Sun"], DateObject[{2022, 1, d, 0, 0, 0}]}]地球の軌道の離心率のため,この距離は1年間にほぼ1AU振動する:
Plot[dES[d], {d, 1, 366}]FindMinimum[QuantityMagnitude[dES[d]], {d, 1, 366}]これは,2022年は1月4日の午前7時(グリニッジ標準時)頃である:
DateObject[{2022, 1, d, 0, 0, 0}] /. Last[%]FindMaximum[QuantityMagnitude[dES[d]], {d, 1, 366}]これは,2022年は7月4日の午前7時(グリニッジ標準時)頃である:
DateObject[{2022, 1, d, 0, 0, 0}] /. Last[%]AstroDistance[Entity["Star", "Vega"]]UnitConvert[%, "LightYears"]% - AstroDistance[Entity["Star", "Vega"], Entity["Star", "Sun"]]これは1年をかけて地球の軌道が太陽の周りを回るにつれて約1AU振動する:
Plot[AstroDistance[Entity["Star", "Vega"], Dated[Here, DateObject[{2022, 1, d, 0, 0, 0}]]] - AstroDistance[Entity["Star", "Vega"], Dated[Entity["Star", "Sun"], DateObject[{2022, 1, d, 0, 0, 0}]]], {d, 1, 366}]Plot[AstroDistance[Entity["Star", "Vega"], Dated[Entity["Star", "Sun"], DateObject[{y}, "Instant", "GregorianYear", 0]]] - AstroDistance[Entity["Star", "Vega"], Entity["Star", "Sun"]], {y, 2022, 2023}]織女星の負の動径運動によって反映されるように,距離は1年間にほぼ2.5AU減少する:
Entity["Star", "Vega"]["RadialVelocity"]ps = PlanetData[]rs = Entity["Star", "Sun"]["Radius"] / (AstroDistance[Entity["Star", "Sun"], #]& /@ ps)Graphics[{Table[{{Orange, Disk[{i - 1 / i, 0} / 80, rs[[i]]]}, Text[ps[[i]], {i - 1 / i, -1} / 80]}, {i, 8}]}, ImageSize -> Full]特性と関係 (3)
AstroDistance[astro,obsrvr]はAstroPosition[astro,obsrvr]["Distance"]に等しい:
now = Now;d = AstroDistance[Entity["PlanetaryMoon", "Callisto"], {Entity["City", {"Paris", "IleDeFrance", "France"}], now}]AstroPosition[Entity["PlanetaryMoon", "Callisto"], {Entity["City", {"Paris", "IleDeFrance", "France"}], now}]%["Distance"]% == QuantityMagnitude[d, "AstronomicalUnit"]AstroDistance[astro1,astro2]は光が astro1から astro2に伝播するのにかかる時間を考慮する.木星が以下の日付に火星から見える距離を計算する:
date = DateObject[{2022, 9, 1, 0, 0, 0}];d1 = AstroDistance[Entity["Planet", "Mars"], {Entity["Planet", "Jupiter"], date}]d1 / Quantity["SpeedOfLight"]//UnitSimplifyd2 = AstroDistance[Entity["Planet", "Mars"], {Entity["Planet", "Jupiter"], date, "LightTime" -> "Geometric"}]d2 - d1//UnitSimplifyd1r = AstroDistance[Entity["Planet", "Jupiter"], {Entity["Planet", "Mars"], date}]d1 - d1r//UnitSimplifyd2r = AstroDistance[Entity["Planet", "Jupiter"], {Entity["Planet", "Mars"], date, "LightTime" -> "Geometric"}]d2 - d2rGeoPositionENUを使ってユーザ位置からプリンシペ島までのユークリッド距離を計算する:
GeoPositionENU[Entity["Island", "PrincipeIsland"], Here]["ENU"]d = Quantity[Norm[%], "Meters"]GeoDistanceは地表における,したがってより長い距離を与える:
GeoDistance[Entity["Island", "PrincipeIsland"], Here, UnitSystem -> "Metric"]AstroDistanceが与えるユークリッド距離と比較する:
AstroDistance[Entity["Island", "PrincipeIsland"], Here] - drframe = {Here, "LightTime" -> "Geometric", "Aberration" -> False, "LightDeflection" -> False};AstroDistance[Entity["Island", "PrincipeIsland"], rframe] - d関連するガイド
テキスト
Wolfram Research (2022), AstroDistance, Wolfram言語関数, https://reference.wolfram.com/language/ref/AstroDistance.html.
CMS
Wolfram Language. 2022. "AstroDistance." Wolfram Language & System Documentation Center. Wolfram Research. https://reference.wolfram.com/language/ref/AstroDistance.html.
APA
Wolfram Language. (2022). AstroDistance. Wolfram Language & System Documentation Center. Retrieved from https://reference.wolfram.com/language/ref/AstroDistance.html
BibTeX
@misc{reference.wolfram_2026_astrodistance, author="Wolfram Research", title="{AstroDistance}", year="2022", howpublished="\url{https://reference.wolfram.com/language/ref/AstroDistance.html}", note=[Accessed: 29-July-2026]}
BibLaTeX
@online{reference.wolfram_2026_astrodistance, organization={Wolfram Research}, title={AstroDistance}, year={2022}, url={https://reference.wolfram.com/language/ref/AstroDistance.html}, note=[Accessed: 29-July-2026]}