Mathematica 식에 데이터 삽입하기

(Ctrl+)는 연산, 그래프 등에 바로 사용할 수 있고 또 디스플레이를 위해 Mathematica 식에 자유 형식 입력을 삽입하여 즉시 연산할 수 있도록 해줍니다.
 In[1]:= XDateListPlot[\!\(\* 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->{337., {25., 30.}}], DynamicModuleValues:>{}], BaseStyle->{Deployed -> True}, DeleteWithContents->True, Editable->False, SelectWithContents->True]\)]
 Out[1]=
 In[2]:= XGrid[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->{218., {26., 31.}}], 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->{275., {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]=