远程数据的仪表盘
从 Wolfram Cloud 账户或其他任何 Wolfram 系统定期向命名为 “Point” 的通道发送点列表.
In[1]:=
task = RunScheduledTask[
ChannelSend[
ChannelObject["points"], <|"points" -> RandomReal[{0, 1}, 100]|>],
1]
在桌面会话中,开始侦听该通道,并安排在点到达时动态绘制图形.
In[1]:=
listener = ChannelListen["points"]
Out[1]=
In[2]:=
Dynamic[ListLinePlot[
If[AssociationQ[#], Lookup[#, "points"], {}] &@listener["Message"],
PlotTheme -> "Marketing"]]
Out[2]=
移除侦听器并停止向云端发送数据.
In[3]:=
RemoveChannelListener[listener]
Out[3]=
In[4]:=
RemoveScheduledTask[task];