我如何使用Wolfram语言计算“适合观赏的夜晚”的日期，当它“暗到”天文时？

Question

我正在试图理解Wolfram语言(我没有使用Mathematica的经验)。

我注意到‘它’有‘天文学知识’。所以我想知道我是否可以计算出以下公式：

tell me the dates and start/finish times of 'dark, socially friendly viewing opportunities during school holidays' where
* 'socially friendly' means between after 10am and before 10:30pm in local time at my vantage point
* it is 'dark' for at least an hour
* where 'dark' means:
  * it's between astronomical sunset and astronomical dawn
  * the moon is either not risen, or less than 15% of its face is lit
* 'school holidays' means school holidays in NSW, Australia, in 2019 (which Wolfram Alpha doesn't 'implicitly know')

put such dates and times as events into my Google Calendar somehow :-)

解决这个玩具问题将帮助我欣赏在这个平台上解决问题所采取的“方法”，它似乎迎合了Wolfram系统的优势。另外，这将为我每年节省一两个小时的查找时间:-)

我该如何在Wolfram语言的“程序”(等式？)中实现这一点？我可以在Wolfram-Alpha中做到这一点吗?或者我需要得到引擎吗？

Answer 1

对你的问题没有一个完整的答案。这只是一个起点。

tz = Entity["TimeZone", "Australia/Sydney"];
date = DateObject[{2019, 07, 14}, TimeZone -> tz];

Sunrise[Entity["City", {"Sydney", "NewSouthWales", "Australia"}], date, TimeZone -> tz]

​

​

Sunset也是如此。

sunset = Sunset[
  Entity["City", {"Sydney", "NewSouthWales", "Australia"}], 
  DateObject[{2019, 07, 14}, TimeZone -> tz], TimeZone -> tz]

您可以从结果中添加/减去2或3个小时，以获得“天文数字”值。

月相

MoonPhase[date]
(* 0.8913 *)

MoonPhase[date, "Name"]["Name"]
(* waxing gibbous moon *)

日落时的月亮位置

MoonPosition[Entity["City", {"Sydney", "NewSouthWales", "Australia"}], sunset]
(* {98.67\[Degree],25.03\[Degree]} *)

有关WL中天文和空间相关实体数据的概述，请查看this视频。