スケジュールされたタスクの状態の概要
すべてのScheduledTasksの状態を表示する関数を生成する．
In[1]:=
DisplayTasks[] := Module[{tasks},
tasks = ScheduledTasks[];
Grid[Take[
Reverse@SortBy[
Map[{Style[ScheduledTaskInformation[#, "Name"], 14,
FontFamily -> "Source Sans Pro"],
Style[ScheduledTaskInformation[#, "Status"], 14,
FontFamily -> "Source Sans Pro"],
NextScheduledTaskTime[#]} &, tasks], Last], 10],
Alignment -> {Left, Top}]
]1時間ごとに情報を表示し，更新するAutoRefreshedオブジェクトを配備する．
In[2]:=
CloudDeploy[AutoRefreshed[DisplayTasks[], "Hourly"], "TaskDisplay"]Out[2]=
