 |  |  |
Trajectoire d’Artemis II : survol lunaire habité dont le lancement est prévu le er1 avril 2026
Trajectoire d’Artemis II : survol lunaire habité dont le lancement est prévu le avril 2026
er
1
par Jeffrey Bryant
Au moment de cette publication, le avril 2026, la NASA va lancer la première mission spatiale habitée autour de la Lune depuis l’époque d’Apollo. Connue sous le nom d’Artemis II, la mission ne va pas alunir et ne va pas se mettre non plus en orbite autour de la Lune, elle va suivre une trajectoire de retour libre qui va faire passer l’équipage autour de la Lune avant de le ramener selon une trajectoire asymétrique en forme de huit.
er
1
In[]:=
Dataset["PrimaryCrew"]
Out[]=
JPL Horizons a publié des données de trajectoire auxquelles on peut accéder via un élément de Wolfram Function Repository appelé « HorizonsEphemerisData ». En utilisant cet outil, vous pouvez demander l’état (position et vitesse) du vaisseau spatial. Les données supposent un lancement au avril, ce qui dépend évidemment de l’absence de toute raison de retarder le lancement en raison de problèmes techniques. JPL Horizons désigne le vaisseau spatial à l’aide de l’identifiant numérique « -1024 ». Avec un peu de chance, à l’avenir, NASA publiera un noyau SPICE qui pourra être utilisé pour la prise en charge native de telles données.
er
1
In[]:=
horizonsEarth="State","@-1024",<|"Frame"->"EclipticJ2000","Center"->,"Dates"->{DateObject[{2026,4,2,1,49,0},TimeZone->0],DateObject[{2026,4,10,23,50},TimeZone->0],Quantity[10,"Minutes"]}|>,All,"Dataset";
L’ensemble de données peut être converti en un objet tabulaire pour un affichage optimal.
In[]:=
Tabular[horizonsEarth]
Out[]=
Les dates et les positions 3D du vaisseau spatial peuvent être extraites via :
In[]:=
datesEarth=Keys[Normal[horizonsEarth]];
In[]:=
xyzArtemisEarth=QuantityMagnitude[Values/@Values@Normal[horizonsEarth[[All,{"X","Y","Z"}]]],"AstronomicalUnit"];
Pour visualiser l’événement, nous avons besoin de quelques données :
In[]:=
earthRad=QuantityMagnitude["EquatorialRadius"],"AstronomicalUnit"
Out[]=
0.00004263521
In[]:=
moonRad=QuantityMagnitude["EquatorialRadius"],"AstronomicalUnit"
Out[]=
0.000011618
In[]:=
flybyDate=DateObject[{2026,4,6,22,0},TimeZone->0];
In[]:=
moonFlybyPos=AstroPosition,"MeanEcliptic",flybyDate,,"Cartesian"["Data"]
Out[]=
{-0.000870163,-0.00255084,-0.000243179}
In[]:=
moonPath=LineAstroPosition,"MeanEcliptic",#,,"Cartesian"["Data"]&/@datesEarth;
In[]:=
artemisEarthTimeSeries=TimeSeries[Transpose[{datesEarth,xyzArtemisEarth}]]
Out[]=
TimeSeries
Manipulate peut être utilisé pour animer l’événement de manière interactive. Du code non documenté est utilisé pour obtenir la rotation correcte de la Terre en fonction du temps.
In[]:=
artemisDataFromEarth[d_]:={StandardRed,AbsolutePointSize[10],Point[artemisEarthTimeSeries[d]],Opacity[.85],AbsoluteThickness[2],Line[xyzArtemisEarth]}
Ici, une fonctionnalité qui, espérons-le, sera documentée publiquement dans une future version est utilisée pour faire pivoter la Terre texturée en fonction de la date.
In[]:=
rotatingEarth[d_]:=ScaleGeometricTransformation["TexturedSurface"][[1]],Astronomy`AstroOrientationMatrix[{"ITRS",d},{"MeanEcliptic",d}],earthRad,{0,0,0}
In[]:=
moonDataFromEarth[d_]:=White,SphereAstroPosition,"MeanEcliptic",d,,"Cartesian"["Data"],moonRad,Opacity[.5],AbsoluteThickness[2],moonPath
In[]:=
optionsFromEarth=;
In[]:=
formatDate[d_]:=Style[DateString[d,{"DayShort"," ","MonthNameShort"," ","Year"," ","Hour24",":","Minute",":","Second"," ","GMT"}],GrayLevel[.75],Bold,17]
In[]:=
Manipulate[Graphics3D[{artemisDataFromEarth[d],rotatingEarth[d],moonDataFromEarth[d]},optionsFromEarth,PlotLabel->formatDate[d]],{d,datesEarth[[1]],datesEarth[[-1]],Quantity[1,"Minutes"]},SaveDefinitions->True]
Out[]=
Nous pouvons également générer une liste d’images et les exporter vers une vidéo avec ce qui suit :
In[]:=
frames=Table[Graphics3D[{artemisDataFromEarth[d],rotatingEarth[d],moonDataFromEarth[d]},ImageSize->{600,720},optionsFromEarth,PlotLabel->formatDate[d]],{d,datesEarth[[1]],datesEarth[[-1]],Quantity[20,"Minutes"]}];
In[]:=
SlideShowVideo[frames,DefaultDuration->15,RasterSize->{600,720}]
Out[]=
Remarquez que la Lune (en blanc) traverse la scène au moment même où le vaisseau spatial atteint son point le plus éloigné de la Terre :
Vue centrée sur la Lune
Vue centrée sur la Lune
Il est également possible de voir ce survol lunaire du point de vue de la Lune. La variante suivante est presque identique à celle ci-dessus, mais l’origine est désormais la Lune.
Les dates et les positions 3D du vaisseau spatial peuvent être extraites via :
Dans ce référentiel, la Terre semble être en orbite autour de la Lune et crée ainsi un arc orbital avec la Lune à l'origine.
CITER CE NOTEBOOK
CITER CE NOTEBOOK
Trajectoire d'Artemis II : survol lunaire habité dont le lancement est prévu le 1er avril 2026
par Jeffrey Bryant
Communauté Wolfram, CHOIX DE L’ÉQUIPE, 31 mars 2026
https://community.wolfram.com/groups/-/m/t/3672762
par Jeffrey Bryant
Communauté Wolfram, CHOIX DE L’ÉQUIPE, 31 mars 2026
https://community.wolfram.com/groups/-/m/t/3672762