Wolfram Astronomie | Zum Ausprobieren
Wolfram Astronomie | Zum Ausprobieren
Nehmen Sie Änderungen vor und führen Sie jeden Code aus, indem Sie in den Code klicken und die Tastenkombination drücken.
+
Astronomische Daten berechnen und visualisieren. Machen Sie die Astronomie berechenbar, mit kuratierten astronomischen Daten und präzisen Positionwerten basierend auf den neuesten verfügbaren Ephemeridenberechnungen. Erstellen Sie mühelos detaillierte Himmelskarten und visualisieren Sie vergangene oder zukünftige astronomische Ereignisse.
Astronomische Berechnungen
Astronomische Berechnungen
Berechnen Sie die Position des Mars in Bezug auf den lokalen Zeithorizont: |
In[]:=
AstroPosition,"Horizon"
Berechnen Sie die äquatorialen Koordinaten von Altair: |
In[]:=
AstroPosition,"Equatorial"
Berechnen Sie die mittleren ekliptikalen Koordinaten von Antares: |
In[]:=
AstroPosition,"MeanEcliptic"
Berechnen Sie die galaktischen Koordinaten von Rigil Kentaurus: |
In[]:=
AstroPosition,"Galactic"
Visualisieren Sie die verschiedenen Bezugsebenen in Relation zur galaktischen Bezugsebene aus der Perspektive der Erde: |
In[]:=
AstroGraphicsAstroReferenceFrame->"Galactic",,AstroBackground->"GalacticSky"
Präzise Dynamiken des Sonnensystems
Präzise Dynamiken des Sonnensystems
Plotten Sie den Winkelabstand zwischen Jupiter und Saturn, wie er von London aus zwischen den Jahren 2000 und 2040 beobachtet wurde: |
In[]:=
PlotAstroAngularSeparation,,Dated,year,{year,2000,2040}
Berechnen Sie die größte scheinbare Annäherung zwischen Jupiter und seinem Mond Europa am 8. Januar 1610: |
In[]:=
date=FindAstroEvent"Appulse",,,,,TimeZone->"Europe/Rome"
Out[]=
Visualisieren Sie die Position von Europa und Jupiter an diesem Tag und beobachten Sie Io im gleichen Feld, ausgerichtet an der Ekliptik: |
In[]:=
ResourceFunction["TelescopeView3D"],date,,"SatellitesToInclude"->EntityClass["PlanetaryMoon","GalileanMoon"],ViewVertical->{0,0,1}
Finsternisse
Finsternisse
Entscheiden Sie sich für das Datum der maximalen Sonnenfinsternis am 8. April 2024: |
In[]:=
eclipse=SolarEclipse[DateObject[{2024,4,8}]]
Erstellen Sie eine Karte des Finsternispfades und anderer relevanter Elemente der Finsternis-relevanten Geometrie: |
In[]:=
SolarEclipse[eclipse,"EclipseMap"]
Astronomische Formeln
Astronomische Formeln
Suchen Sie nach Formeln in natürlicher Sprache: |
In[]:=
forms=Join[FormulaLookup["apparent magnitude formula"],FormulaLookup["parallax formula"],FormulaLookup["Drake's equation"],FormulaLookup["stellar energy flux equation"],{FormulaLookup["black hole temperature"][[1]]}]
Rufen Sie Gleichungen für Formeln ab: |
In[]:=
eqs=FormulaData/@forms
ZeigenSieFormelnintraditionellerNotationan:
In[]:=
TraditionalForm[Column[eqs]]
Berechnen Sie das Helligkeitsverhältnis zwischen zwei Sternen mit unterschiedlicher scheinbarer Helligkeit: |
In[]:=
FormulaData["ApparentMagnitudeIntensity",{->4.5,->6.35}]
m
1
m
2
Astronomische Daten
Astronomische Daten
Wählen Sie zufällig einen Apollo-Asteroiden aus: |
In[]:=
asteroid=RandomChoiceEntityList
Fragen Sie verschiedenen Eigenschaften des Asteroiden ab:
In[]:=
EntityValue[asteroid,{"SemimajorAxis","Eccentricity","Inclination","Apoapsis","Periapsis"},"Dataset"]
Erstellen Sie ein Histogramm der Werte der großen Halbachsen der Apollo-Asteroiden: |
In[]:=
Histogram["DistanceFromSun"],PlotTheme->"Marketing",FrameLabel->{"semimajor axis (AU)","asteroid count"}
Astro-Visualisierungen
Astro-Visualisierungen
Nehmen wir an, dass der Himmel am 15. August 2024 um 22 Uhr genau nach Süden zeigt und 30° über dem Horizont zentriert ist: |
In[]:=
AstroGraphics[AstroReferenceFrame->{"Horizon",DateObject[{2024,8,15,22,0,0}]},AstroBackground->"GalacticSky",AstroProjection->"Stereographic",AstroRange->Quantity[35,"AngularDegrees"],AstroCenter->{180,30}]
Sternbilder und Sternkarten
Sternbilder und Sternkarten
Legen Sie einige benutzerdefinierte Stile für eine Sternkarte fest: |
In[]:=
style={"ShowConstellationIllustrations"->True,"ShowConstellationRegions"->True,"ConstellationRegionStyle"->Darker[Blue,.2],"ConstellationLineStyle"->Opacity[0.6,LightBlue],"ShowConstellationBoundaries"->True,"ConstellationBoundaryStyle"->Directive[Dashing[{0,Tiny}],Yellow],"ConstellationNameStyle"->GrayLevel[0.7],"ShowSolarSystemObjects"->False};
Visualisieren Sie den Himmel mit Blick auf das Sternbild Skorpion und fügen Sie die benutzerdefinierten Stile mit Illustrationen und Grenzen ein: |
In[]:=
AstroGraphics,AstroBackground->AstroStyling"GalacticSky","ShowConstellations"->,style,AstroReferenceFrame->"J2000"
Zeitangaben in der Astronomie
Zeitangaben in der Astronomie
Berechnen Sie die wöchentlichen Positionen des Mars von Juli 2022 bis Juli 2023: |
In[]:=
mars=AstroPosition[Entity["Planet","Mars"],{"Equatorial",#}]&/@DateRange["1 Jul 2022","1 July 2023","Week"];
Ein Teil der Bahn war rückläufig: |
In[]:=
AstroGraphics[{White,Point[mars]},AstroReferenceFrame->"Equatorial"]
Skalen im Universum
Skalen im Universum
Definieren Sie eine Gleichung im Nanometerbereich: |
In[]:=
equation=FormulaData[{"PlanckRadiationLaw","Wavelength"},{"T"->Quantity[5000,"Kelvins"],"λ"->Quantity[wl,"Nanometers"]}][[2,2]];
Plotten Sie die Gleichung über eine Reihe von Wellenlängen: |
In[]:=
Plot[equation,{wl,200,5000},AxesLabel->{"Wavelength (nm)","Spectral radiance (W )"}]
-1
sr
-3
m
Untersuchen Sie die Eigenschaften von kosmologischen Modellen beliebiger Zusammensetzung: |
UniverseModelData[Quantity[10^9,"Parsecs"],<|"OmegaLambda"->0,"OmegaMatter"->0.8,"OmegaRadiation"->0.2,"HubbleH0"->Quantity[50,("Kilometers")/("Megaparsecs""Seconds")]|>]
Geografie von Himmelskörpern
Geografie von Himmelskörpern
Interpretieren Sie die Merkmale des Sonnensystems mit natürlicher Sprache: |
In[]:=
feature=Interpreter["SolarSystemFeature"]["Sinai Planum"]
Erstellen Sie eine Reliefkarte der Himmelskörper des Sonnensystems: |
In[]:=
GeoGraphics[GeoCenter->feature,GeoBackground->"ReliefMap",GeoRange->Quantity[1000,"Miles"]]