Интеграция с Wolfram|Alpha

Включение данных в выражения системы Mathematica

(Ctrl+

) включает команду, заданную в свободной форме, в выражение системы Mathematica для непосредственного использования в вычислениях, построения графиков или отображения.

In[1]:=

DateListPlot[\!\(\*

NamespaceBox["LinguisticAssistant",

DynamicModuleBox[{WolframAlphaClient`Private`query$$ =

"population history of germany",

WolframAlphaClient`Private`boxes$$ = RowBox[{"CountryData", "[",

RowBox[{"\"Germany\"", ",", " ",

RowBox[{"{",

RowBox[{"\"Population\"", ",", " ", "All"}], "}"}]}], "]"}],

WolframAlphaClient`Private`allassumptions$$ = {},

WolframAlphaClient`Private`assumptions$$ = {},

WolframAlphaClient`Private`open$$ = {1, 2}},

DynamicBox[ToBoxes[

AlphaIntegration`LinguisticAssistantBoxes["", 1,

Dynamic[WolframAlphaClient`Private`query$$],

Dynamic[WolframAlphaClient`Private`boxes$$],

Dynamic[WolframAlphaClient`Private`allassumptions$$],

Dynamic[WolframAlphaClient`Private`assumptions$$],

Dynamic[WolframAlphaClient`Private`open$$]], StandardForm],

ImageSizeCache->{336., {25., 30.}}],

DynamicModuleValues:>{}],

BaseStyle->{Deployed -> True},

DeleteWithContents->True,

Editable->False,

SelectWithContents->True]\)]

Out[1]=

In[2]:=

Grid[Transpose[{\!\(\*

NamespaceBox["LinguisticAssistant",

DynamicModuleBox[{WolframAlphaClient`Private`query$$ = "planets",

WolframAlphaClient`Private`boxes$$ =

RowBox[{"AstronomicalData", "[", "\"Planet\"", "]"}],

WolframAlphaClient`Private`allassumptions$$ = {{

"type" -> "Clash", "word" -> "planets", "count" -> "3",

"Values" -> {{

"name" -> "AstronomicalClass",

"desc" -> "a class of astronomical objects",

"input" -> "*C.planets-_*AstronomicalClass-"}, {

"name" -> "ExamplePage", "desc" -> "a general topic",

"input" -> "*C.planets-_*ExamplePage-"}, {

"name" -> "Word", "desc" -> "a word",

"input" -> "*C.planets-_*Word-"}}}},

WolframAlphaClient`Private`assumptions$$ = {},

WolframAlphaClient`Private`open$$ = {1, 2}},

DynamicBox[ToBoxes[

AlphaIntegration`LinguisticAssistantBoxes["", 1,

Dynamic[WolframAlphaClient`Private`query$$],

Dynamic[WolframAlphaClient`Private`boxes$$],

Dynamic[WolframAlphaClient`Private`allassumptions$$],

Dynamic[WolframAlphaClient`Private`assumptions$$],

Dynamic[WolframAlphaClient`Private`open$$]], StandardForm],

ImageSizeCache->{217., {25., 30.}}],

DynamicModuleValues:>{}],

BaseStyle->{Deployed -> True},

DeleteWithContents->True,

Editable->False,

SelectWithContents->True]\), \!\(\*

NamespaceBox["LinguisticAssistant",

DynamicModuleBox[{WolframAlphaClient`Private`query$$ = "planet mass",

WolframAlphaClient`Private`boxes$$ =

RowBox[{"AstronomicalData", "[",

RowBox[{"\"Planet\"", ",", " ", "\"Mass\""}], "]"}],

WolframAlphaClient`Private`allassumptions$$ = {},

WolframAlphaClient`Private`assumptions$$ = {},

WolframAlphaClient`Private`open$$ = {1, 2}},

DynamicBox[ToBoxes[

AlphaIntegration`LinguisticAssistantBoxes["", 1,

Dynamic[WolframAlphaClient`Private`query$$],

Dynamic[WolframAlphaClient`Private`boxes$$],

Dynamic[WolframAlphaClient`Private`allassumptions$$],

Dynamic[WolframAlphaClient`Private`assumptions$$],

Dynamic[WolframAlphaClient`Private`open$$]], StandardForm],

ImageSizeCache->{274., {25., 30.}}],

DynamicModuleValues:>{}],

BaseStyle->{Deployed -> True},

DeleteWithContents->True,

Editable->False,

SelectWithContents->True]\), \!\(\*

NamespaceBox["LinguisticAssistant",

DynamicModuleBox[{WolframAlphaClient`Private`query$$ =

"planet radius", WolframAlphaClient`Private`boxes$$ =

RowBox[{"AstronomicalData", "[",

RowBox[{"\"Planet\"", ",", " ", "\"Radius\""}], "]"}],

WolframAlphaClient`Private`allassumptions$$ = {},

WolframAlphaClient`Private`assumptions$$ = {},

WolframAlphaClient`Private`open$$ = {1, 2}},

DynamicBox[ToBoxes[

AlphaIntegration`LinguisticAssistantBoxes["", 1,

Dynamic[WolframAlphaClient`Private`query$$],

Dynamic[WolframAlphaClient`Private`boxes$$],

Dynamic[WolframAlphaClient`Private`allassumptions$$],

Dynamic[WolframAlphaClient`Private`assumptions$$],

Dynamic[WolframAlphaClient`Private`open$$]], StandardForm],

ImageSizeCache->{288., {25., 30.}}],

DynamicModuleValues:>{}],

BaseStyle->{Deployed -> True},

DeleteWithContents->True,

Editable->False,

SelectWithContents->True]\)}], Frame -> All]

Out[2]=