My tests of using AstronomicalData versus StarData show that StarData requests are 15 times slower for the exact same request. Can anyone make a recommendation to improve the sample test below?
Length[m1 = AstronomicalData["ClassMStar"]]
(* Out: 4258 *)
Timing[
Length[
listClassMStar =
{AstronomicalData[#, "Name"], AstronomicalData[#, "HDNumber"],
AstronomicalData[#, "SpectralClass"], AstronomicalData[#, "BVColorIndex"],
AstronomicalData[#, "EffectiveTemperature"], AstronomicalData[#, "Mass"],
AstronomicalData[#, "Luminosity"], AstronomicalData[#, "AbsoluteMagnitude"],
AstronomicalData[#, "ApparentMagnitude"], AstronomicalData[#, "ConstellationName"]} &
/@ m1]]
(* Out: {45.5534, 4258} *)
Timing[
Length[
listClassMStar =
StarData[
m1, {"Name", "HDNumber", "SpectralClass", "BVColorIndex", "EffectiveTemperature",
"Mass", "Luminosity", "AbsoluteMagnitude", "ApparentMagnitude",
"ConstellationName"}
]
]
]
(* Out: {702.228, 4258} *)