Wolfram言語

クラウドへの保存とクラウド操作

クラウド式に任意の式を保存する

クラウド式は,任意の式をクラウドに保存する.

"Polyhedron/Dodecahedron"というパスの下に新規のクラウド式を作成する.

In[1]:=
Click for copyable input
CreateCloudExpression[\!\(\* Graphics3DBox[ GraphicsComplex3DBox[ NCache[{{-(1 + 2 5^Rational[-1, 2])^Rational[1, 2], 0, Root[ 1 - 20 #^2 + 80 #^4& , 3, 0]}, {( 1 + 2 5^Rational[-1, 2])^Rational[1, 2], 0, Root[ 1 - 20 #^2 + 80 #^4& , 2, 0]}, { Root[1 - 20 #^2 + 80 #^4& , 1, 0], Rational[1, 4] (-3 - 5^Rational[1, 2]), Root[ 1 - 20 #^2 + 80 #^4& , 3, 0]}, { Root[1 - 20 #^2 + 80 #^4& , 1, 0], Rational[1, 4] (3 + 5^Rational[1, 2]), Root[ 1 - 20 #^2 + 80 #^4& , 3, 0]}, {( Rational[5, 8] + Rational[11, 8] 5^Rational[-1, 2])^Rational[ 1, 2], Rational[1, 4] (-1 - 5^Rational[1, 2]), Root[ 1 - 20 #^2 + 80 #^4& , 3, 0]}, {( Rational[5, 8] + Rational[11, 8] 5^Rational[-1, 2])^Rational[ 1, 2], Rational[1, 4] (1 + 5^Rational[1, 2]), Root[ 1 - 20 #^2 + 80 #^4& , 3, 0]}, { Root[1 - 20 #^2 + 80 #^4& , 2, 0], Rational[1, 4] (-1 - 5^Rational[1, 2]), ( Rational[5, 8] + Rational[11, 8] 5^Rational[-1, 2])^Rational[ 1, 2]}, { Root[1 - 20 #^2 + 80 #^4& , 2, 0], Rational[1, 4] (1 + 5^Rational[1, 2]), ( Rational[5, 8] + Rational[11, 8] 5^Rational[-1, 2])^Rational[ 1, 2]}, { Rational[-1, 2] (1 + 2 5^Rational[-1, 2])^Rational[1, 2], Rational[-1, 2], Root[1 - 100 #^2 + 80 #^4& , 1, 0]}, { Rational[-1, 2] (1 + 2 5^Rational[-1, 2])^Rational[1, 2], Rational[1, 2], Root[ 1 - 100 #^2 + 80 #^4& , 1, 0]}, {( Rational[1, 4] + Rational[1, 2] 5^Rational[-1, 2])^Rational[ 1, 2], Rational[-1, 2], ( Rational[5, 8] + Rational[11, 8] 5^Rational[-1, 2])^Rational[ 1, 2]}, {( Rational[1, 4] + Rational[1, 2] 5^Rational[-1, 2])^Rational[ 1, 2], Rational[ 1, 2], (Rational[ 5, 8] + Rational[11, 8] 5^Rational[-1, 2])^Rational[ 1, 2]}, {(Rational[1, 10] (5 + 5^Rational[1, 2]))^Rational[ 1, 2], 0, Root[1 - 100 #^2 + 80 #^4& , 1, 0]}, { Root[1 - 100 #^2 + 80 #^4& , 1, 0], Rational[1, 4] (-1 - 5^Rational[1, 2]), Root[ 1 - 20 #^2 + 80 #^4& , 2, 0]}, { Root[1 - 100 #^2 + 80 #^4& , 1, 0], Rational[1, 4] (1 + 5^Rational[1, 2]), Root[ 1 - 20 #^2 + 80 #^4& , 2, 0]}, { Root[1 - 5 #^2 + 5 #^4& , 1, 0], 0, (Rational[ 5, 8] + Rational[11, 8] 5^Rational[-1, 2])^Rational[ 1, 2]}, { Root[1 - 20 #^2 + 80 #^4& , 3, 0], Rational[1, 4] (-1 - 5^Rational[1, 2]), Root[ 1 - 100 #^2 + 80 #^4& , 1, 0]}, { Root[1 - 20 #^2 + 80 #^4& , 3, 0], Rational[1, 4] (1 + 5^Rational[1, 2]), Root[ 1 - 100 #^2 + 80 #^4& , 1, 0]}, {( Rational[1, 8] + Rational[1, 8] 5^Rational[-1, 2])^Rational[ 1, 2], Rational[1, 4] (-3 - 5^Rational[1, 2]), Root[ 1 - 20 #^2 + 80 #^4& , 2, 0]}, {( Rational[1, 8] + Rational[1, 8] 5^Rational[-1, 2])^Rational[ 1, 2], Rational[1, 4] (3 + 5^Rational[1, 2]), Root[ 1 - 20 #^2 + 80 #^4& , 2, 0]}}, {{-1.3763819204711736`, 0, 0.2628655560595668}, { 1.3763819204711736`, 0, -0.2628655560595668}, {-0.42532540417602, \ -1.3090169943749475`, 0.2628655560595668}, {-0.42532540417602, 1.3090169943749475`, 0.2628655560595668}, { 1.1135163644116066`, -0.8090169943749475, 0.2628655560595668}, {1.1135163644116066`, 0.8090169943749475, 0.2628655560595668}, {-0.2628655560595668, -0.8090169943749475, 1.1135163644116066`}, {-0.2628655560595668, 0.8090169943749475, 1.1135163644116066`}, {-0.6881909602355868, -0.5, \ -1.1135163644116066`}, {-0.6881909602355868, 0.5, -1.1135163644116066`}, {0.6881909602355868, -0.5, 1.1135163644116066`}, {0.6881909602355868, 0.5, 1.1135163644116066`}, { 0.85065080835204, 0, -1.1135163644116066`}, {-1.1135163644116066`, \ -0.8090169943749475, -0.2628655560595668}, {-1.1135163644116066`, 0.8090169943749475, -0.2628655560595668}, {-0.85065080835204, 0, 1.1135163644116066`}, { 0.2628655560595668, -0.8090169943749475, \ -1.1135163644116066`}, {0.2628655560595668, 0.8090169943749475, -1.1135163644116066`}, { 0.42532540417601994`, -1.3090169943749475`, \ -0.2628655560595668}, {0.42532540417601994`, 1.3090169943749475`, -0.2628655560595668}}], Polygon3DBox[{{15, 10, 9, 14, 1}, {2, 6, 12, 11, 5}, {5, 11, 7, 3, 19}, {11, 12, 8, 16, 7}, {12, 6, 20, 4, 8}, {6, 2, 13, 18, 20}, {2, 5, 19, 17, 13}, {4, 20, 18, 10, 15}, {18, 13, 17, 9, 10}, {17, 19, 3, 14, 9}, {3, 7, 16, 1, 14}, {16, 8, 4, 15, 1}}]], ViewPoint->{2.8106445462488727`, -1.4256056405758222`, 1.2320413110768131`}, ViewVertical->{0.1370732366231519, -0.3402082824376028, 1.1572406126677426`}]\), "Polyhedron/Dodecahedron"]
Out[1]=

その値を取り出す.

In[2]:=
Click for copyable input
Get[CloudExpression["Polyhedron/Dodecahedron"]]
Out[2]=

関連する例

de en es fr ko pt-br ru zh