Язык Wolfram Language

Сеть каналов связи

Создание динамичного мешап-сервиса IFTTT («Если это, тогда то»)

В сеансе Wolfram Desktop создать канал, который будет получать данные из IFTTT.

In[1]:=
Click for copyable input
channel = CreateChannel["IFTTT", Permissions -> "Public"]
Out[1]=

Подписавшись на канал, будем накапливать до 2000 значимых слов из входящих сообщений.

In[2]:=
Click for copyable input
list = {};
In[3]:=
Click for copyable input
listener = ChannelListen[ "IFTTT", (list = Take[Flatten[{DeleteCases[#, "RT"] &@ DeleteStopwords@ DeleteCases[ TextWords[ Lookup[#Message, "text", ""]], _?(StringMatchQ[#, RegularExpression["^(@|http(s)?://).*"]] &)], list}], UpTo[2000]]) &]
Out[3]=

Создадим URL для использования в IFTTT.

In[4]:=
Click for copyable input
URLBuild[listener["URL"], {"operation" -> "send"}]
Out[4]=

Создадим IFTTT, который отправляет данные каналу, как только кто-то упоминает слово "политика" в сети Twitter.

Out[5]=

Динамически отображать слова самых последних сообщений в Twitter и просматривать всё происходящее в режиме онлайн.

In[6]:=
Click for copyable input
Dynamic[WordCloud[list]]
Out[6]=

Родственные примеры

de en es fr ja ko pt-br zh