💽 👼🏻 🙆🏿 Wolfram Programming Cloudの詳細なレビュー 📤 🥀 🤲🏽

2014年6月23日、1週間足らず前、長い開発期間の後、Wolfram Researchの新しい製品、Wolfram Programming Cloud（Wolfram Programming Cloud）がリリースされました。 Steven Wolframは彼のブログについて書いており、彼の投稿はHabrahabrに翻訳されました。

Wolfram Programming Cloudを使用すると、ブラウザやデバイスを問わずWolfram言語でプログラミングでき、既製のアプリケーション（Web入力フォームおよび近々モバイルアプリケーション）を作成したり、直接APIを操作したり、自動生成されたレポートを作成したり、タスク、Webページを作成したり、 CDFなど。同時に、誰もが無料で Wolfram Programming Cloudを試して使用する機会があります。

この製品のロシア語での最初の詳細なビデオレビューと、通常のデスクトップ（Wolframデスクトップ）の実装についてお話したいと思います。

概要から、Wolfram Programming Cloudの操作方法、入力フォームとAPIの作成方法、Wolfram Desktopの使用方法などを学びます。

ビデオでは、地理データを使用したクラウドでの作業、VKontakte API、クラウドから電子メールへのメッセージの送信、画像の処理とアップロード（ユーザーデバイスとインターネットの両方から）、組み込みのWolfram言語機能などの特定の例について説明します。

ビデオレビューで使用される主なWolframコード：

地形グラフ

CloudDeploy@FormFunction[ {"city" -> "ComputedCity"}, Module[{data}, data = GeoElevationData[GeoBoundingBox[GeoDisk[#city, Quantity[10, "Kilometers"]]]]; Grid[{{#city}, {ListPlot3D[data, MeshFunctions -> {#3 &}, Mesh -> {{1, 0}}, MeshStyle -> Thick, ColorFunction -> ColorData["HypsometricTints"], ColorFunctionScaling -> False,ImageSize -> 600]}}, Alignment -> {Center,Center}]]&, "HTML"]

画像処理アプリケーション

 im1=Import["    -"]; im2=Import["    -"]; images =RemoveAlphaChannel[ColorConvert[#, "RGB"] ,White]&/@{im1, im2}; webString[str_]:=StringReplace[ExportString[Cell[str], "HTML", "FullDocument" -> False],"<span>"|"</span>" -> ""] CloudDeploy[ FormFunction[ {{"im1"," "} -> "Image", {"im2",webString@" "} -> "Image"}, Module[{images,imDims,minX,minY,image,head}, images = RemoveAlphaChannel[ColorConvert[#, "RGB"] ,White]&/@{#im1, #im2}; imDims = ImageDimensions /@ images; minX = Min[imDims[[;; , 1]]]; images = ImageResize[#, minX] & /@ images; imDims = ImageDimensions /@ images; minY = Min[imDims[[;; , 2]]]; Table[image[i] = ImageData[ImageCrop[images[[i]], {minX, minY}]], {i, 1, Length[images]}]; head = 1; Image@Table[head = Replace[head, {1 -> 2, 2 -> 1}];image[head][[i, j]], {i, 1, minY}, {j, 1, minX}]]&, "PNG", AppearanceRules -> <|"Title" -> webString@" ", "Description" -> webString@ "  ,     .", "SubmitLabel" -> webString@""|>]]

VK APIを使用する

 $VkAPIAccessToken =" accesstoken"; VkAPIMethod[method_, {options___}] := Module[{response}, "response" /.ImportString[URLFetch["https://api.vk.com/method/" <> method, "Parameters" -> {"access_token" -> $VkAPIAccessToken, options}], "JSON"]]; message := Module[{fromId, date, text, Body, Subject,password}, {currentId, fromId, date,text} = {"id", "from_id", "date", "text"} /.VkAPIMethod["wall.get", {"owner_id" -> "-1172233", "offset" -> "0","count" -> "1"}][[2]]; Body = ToString[TableForm@{Row[{" : ","http://vk.com/id" <> ToString@fromId}], DateString[AbsoluteTime[{1970, 1, 1, 0, 0, 0}] + date, {"Hour", ":","Minute", ":", "Second", " ", "Day", ".", "Month", ".","Year"}], text}]; Subject ="      Wolfram Mathematica "; password = CloudSymbol["pass"]; If[currentId === lastId, Null, SendMail["To" -> "raosipov@gmail.com", "Subject" -> Subject,"Body" -> Body, "Password" -> password]; lastId = currentId]] message;

このビデオレビューがあなたの興味を引き、Wolfram Programming Cloudをより早く始められることを願っています！

Wolfram Programming Cloudの詳細なレビュー

More articles: