|
Producing a Star Atlas
http://www.wolfram.com/applications/astronomer/index.html
setup
<<Astronomer`HomeSite`

<<Astronomer`Star3000`
Section of Equator
To produce an atlas of the entire sky, that is suitable for printing, you can use StarChart to plot sectors around the celestial equator and RadialStarChart to plot the polar caps.
For example, here is one of the six sectors around the celestial equator:
StarChart[Sector5, ConstellationLabels True, StarLabels True, Epilog (StarNames[ToExpression[#1]]&) /@ Names["Constellation`*"]];1;

South Polar Cap
Here is the south celestial polar cap:
RadialStarChart[SouthCelestialPole, RadialAngle 35 Degree, ConstellationLabels True, StarLabels True, Epilog (StarNames[ToExpression[#1]]&) /@ Names["Constellation`*"]];1;

Colored Atlas
You could produce a colored star atlas as well:
StarChart[Sector5, ConstellationLabels True, StarLabels True, StarColors True, Epilog {RGBColor[1,1,0], (StarNames[ToExpression[#1]]&) /@ Names["Constellation`*"]}];1;

|