Wolfram Cloud からデータファイルをダウンロードできるようにする

Mathematica の授業で受講者にデータを配布したい。 Wolfram Cloud からデータファイルをダウンロードできるようにできればこれが実現する。

Wolfram Mathematica Online の説明のページには可能であると書いてある。しかし、具体的な方法が載っていないので、思考錯誤した結果見つけた方法をここに載せます。

次は Mathematica Online で評価したノートブックです。data.txt はあらかじめアップロードした状態で動かしています。

SetDirectory[NotebookDirectory[]];
data=Import["data.txt","Table"];
TableForm[Take[data,2]] 1000,ba,b,ab,ba,b,ba,b,b,b,b,b,ab,d 1001,ba,b,ba,b,bb,b,b,c,c,c,c,c,c Export["data.csv","Table"]; obj=CloudExport[data,"Table","dataCloud.csv",Permissions->"Private"]; obj[[1]] https://www.wolframcloud.com/objects/user-cce28da9-e8e4-44c1-81f7-2b959a452e8a/dataCloud.cs

最後に表示された url をブログに書き込み、それをクリックすればダウンロードできることがわかった。 ただし、許可を Private にしているので制限がかかっている。次が例です。

dataCloud.csv  Download from Wolfram Cloud Private

許可を Public にすれば誰でもダウンロードできることになります。

目次へ