행성의 고유 운동
StarData는 수천개 행성의 다수의 특성에 손쉬운 접근을 제공합니다. 그 특성 중 하나로 별의 고유 운동을 추적하는 지구로 부터의 거리 시계열을 꼽을 수 있습니다. 고유 운동의 정의는 WikipediaData를 통해 알수있습니다.
In[1]:=
![Click for copyable input](assets.ko/proper-motion-of-stars/In_123.png)
TextSentences[WikipediaData["Proper_motion", "ArticlePlaintext"]][[1]]
Out[1]=
![](assets.ko/proper-motion-of-stars/O_68.png)
지구에서 가장 가까운 10개의 별을 EntityClass로 정의합니다.
In[2]:=
![Click for copyable input](assets.ko/proper-motion-of-stars/In_124.png)
close10 = EntityClass["Star", "StarNearest10"]
Out[2]=
![](assets.ko/proper-motion-of-stars/O_69.png)
행성의 목록을 구합니다.
In[3]:=
![Click for copyable input](assets.ko/proper-motion-of-stars/In_125.png)
close10["Entity"]
Out[3]=
![](assets.ko/proper-motion-of-stars/O_70.png)
고유 운동의 시계열을 가져오고 결손된 데이터는 삭제합니다.
In[4]:=
![Click for copyable input](assets.ko/proper-motion-of-stars/In_126.png)
res = DeleteMissing[
EntityClass["Star", "StarNearest10"][{"Entity",
"StarDistanceTimeSeries"}], 1, 2]
Out[4]=
![](assets.ko/proper-motion-of-stars/O_71.png)
지구와 태양 사이의 거리는 다른 항성 사이의 거리에 비해 매우 작기 때문에, 태양의 시계열은 그 고유 운동을 반영하고 있지 않고 제외됩니다. 다른 행성의 대부분은 지구와 태양과의 거리를 거의 일정하게 유지하고 있지만 그중 근접하고 멀어지는 것이 두개있습니다.
전체 Wolfram 언어 입력 표시하기
Out[5]=
![](assets.ko/proper-motion-of-stars/O_72.png)