ListPlot3D[{{f11,…,f1n},…,{fm1,…,fmn}}]
の位置が{j,i}で高さが fijの曲面を生成する.
ListPlot3D[{{x1,y1,f1},…,{xk,yk,fk}}]
の位置が{xi,yi}で高さが fiの曲面を生成する.
ListPlot3D[{data1,data2,…}]
各 datai に対応する曲面をプロットする.
ListPlot3D
ListPlot3D[{{f11,…,f1n},…,{fm1,…,fmn}}]
の位置が{j,i}で高さが fijの曲面を生成する.
ListPlot3D[{{x1,y1,f1},…,{xk,yk,fk}}]
の位置が{xi,yi}で高さが fiの曲面を生成する.
ListPlot3D[{data1,data2,…}]
各 datai に対応する曲面をプロットする.
詳細とオプション
- ListPlot3Dは3D曲面プロットとしても知られている.
- 規則的なデータ{{f11,…,f1n},…,{fm1,…,fmn}}は点{x,y}における高さ f[x,y]としてプロットされる.ただし, f[j,i]は値 fijを持つ.
- 不規則データ{{x1,y1,f1},…,{xn,yn,zn}}は点{x,y}における高さ f[x,y]としてプロットされる.たさし, f[xi,yi]は値 fiを持つ.
- この関数は曲面
を可視化する.ただし,f は上記の関数であり領域
は規則的なデータについてはデカルト積
,不規則データについては{{x1,y1},…,{xn,yn}}の凸包である. - データの値 xi,yi,fiは次の形で与えることができる.
-
xi 実数値の数 Quantity[xi,unit] 単位付きの数量 Around[xi,ei] 不確かさが eiの値 xi Interval[{xmin,xmax}] xminから xmaxまでの値 - 上記の形式ではない値 xi,yi,fiは,欠落値とみなされ,表示されない.
- dataiは次の形式と解釈を持つ.
-
<|"k1"{x1,y1,f1},"k2"{x2,y2,f2},…|> 値{{x1,y1,f1},…,{xk,yk,fk}} SparseArray 正規配列としての値 QuantityArray 大きさ WeightedData 重みのない値 - ListPlot3D[Tabular[…]cspec]は,列指定 cspec を使って表形式オブジェクトから値を抽出し,これをプロットする.
- 次は,表形式データのプロットに使用可能な列指定 cspec の形式である.
-
{colx,coly,colz} 列 z と列 x および y をプロットする {{colx1,coly1,colz1},{colx2,coly2,colz2},…} 列 z1と列 x1および y1,列 z2と列 x2および y2をプロットする等 - ListPlot3D[array]では,array は長方配列でなければならない.配列の各要素は
値に対応する単一の実数でも一組の
でもよい. - 明示的な高さの値を表さない配列要素に対応する曲面の部分には穴が開く.
- ListPlot3D[array]はデフォルトにより,各データ点の
座標と
座標の値が,1から始まる連続する整数であると解釈する. - array の要素は,明示的な位置{xij,yij}における高さ zijを指定する{x11,y11,z11}でもよい.この場合の曲面の接続性も2D配列に準ずるものとされる.
- dataiには,次のラッパー w を使うことができる.
-
Annotation[datai,label] データに注釈を与える Button[datai,action] データがクリックされた際に実行するアクションを定義する Callout[datai,label] コールアウトでデータにラベルを付ける Callout[datai,label,pos] コールアウトを相対位置 pos に付ける EventHandler[datai,…] データの一般的なイベントハンドラを定義する Hyperlink[datai,uri] データをハイパーリンクにする Labeled[datai,label] データにラベルを付ける Labeled[datai,label,pos] ラベルを相対的な位置 pos に置く Legended[datai,label] データを凡例で識別する PopupWindow[datai,cont] データにポップアップウィンドウを付ける StatusArea[datai,label] マウスが来たときにステータスエリアに表示する Style[datai,styles] 指定したスタイルを使ってデータを示す Tooltip[datai,label] データにツールチップを付ける Tooltip[datai] データの値をツールチップとして使う - ラッパー w は複数のレベルで適用することができる.
-
w[datai] データをラップする w[{data1,…}] dataiの集合をラップする w1[w2[…]] ネストしたラッパーを使う - Callout,LabeledとPlacedには次の位置 pos が使える.
-
Automatic 自動的に置かれたラベル Above, Below, Before, After 曲面の周りの位置 {x,y} 位置{x,y}の曲面の近く {x,y,z} 位置{x,y,z} {s,Above},{s,Below},… 曲面周囲の位置 s の相対的な位置 {pos,epos} データと相対的な位置 pos に置かれたラベル中の epos - ListPlot3Dには,Graphics3Dと同じオプションの他,以下のオプションが使われる. [全オプションのリスト]
- 明示的な
および
が与えられていないデフォルトの場合,DataRange->{{xmin,xmax},{ymin,ymax}}という設定は使用する座標範囲を指定する. - デフォルト設定のDataRange->Automaticの場合,ListPlot3D[{{a11,a12,a13},…,{an1,an2,an3}}]は与えられるデータが
×3の高さの配列ではなく{{x1,y1,z1},…}であると推測する. - ListPlot3D[list,DataRange->All]は,list が常に高さの値の配列を表すと解釈する.
- PlotLegendsの典型的な設定には,次のものが含まれる.
-
None 凡例なし Automatic 凡例を自動的に決定する {lbl1,lbl2,…} lbl1,lbl2,… を凡例ラベルとして使用する Placed[lspec,…] 凡例の配置を指定する - PlotStylesty は,各曲線に使用するスタイルを指定する.可能な設定には次が含まれる .
-
{sty1,sty2,…} データ集合に対するスタイルの列 <|"key"val,…|> データの異なるレベルに対するスタイル要素 - 使用可能なキーは次の通りである.
-
"Base" すべての datai に対する全体的な スタイル "Lists" 各 datai に対するスタイル styi のリスト - ColorData["DefaultPlotColors"] は,PlotStyle によって使用される色のデフォルトの並びを与える.
- ScalingFunctionsの可能な設定値
-
sz z 軸をスケールする {sx,sy} x 軸と y 軸をスケールする {sx,sy,sz} x 軸,y 軸,z 軸をスケールする - 各スケーリング関数 siは,文字列"scale"または{g,g-1}である.g-1は g の逆数である.
- ListPlot3D[array]の場合,Mesh->Fullは各データ点で交差するメッシュを描く.
- MeshFunctionsとRegionFunctionの関数に渡される引数は
,
,
である.ColorFunctionとTextureCoordinateFunctionの関数には,デフォルトによりこれらの引数をスケールしたものが渡される. - VertexColorsの設定値は座標データと同じ構造の配列かリストでなければならない.
- VertexColorsの明示的な設定値はColorFunctionによって決定される色に優先する.
- 3D曲面に影響するテーマ
-

"DarkMesh" 色の濃いメッシュライン 
"GrayMesh" グレーのメッシュライン 
"LightMesh" 色の薄いメッシュライン 
"ZMesh" 垂直に配置されたメッシュライン 
"ThickSurface" 曲面に厚みを与える 
"FilledSurface" 曲面の下を塗り潰す - ListPlot3DはGraphics3D[data]を返す.
全オプションのリスト
例題
すべて開く すべて閉じる例 (3)
ListPlot3D[{{1, 1, 1, 1}, {1, 2, 1, 2}, {1, 1, 3, 1}, {1, 2, 1, 4}}, Mesh -> All]ListPlot3D[{{0, 0, 1}, {1, 0, 0}, {0, 1, 0}}, Mesh -> All]data = Table[Sin[j ^ 2 + i], {i, 0, Pi, Pi / 5}, {j, 0, Pi, Pi / 5}];ListPlot3D[data, Mesh -> None, InterpolationOrder -> 0, ColorFunction -> "SouthwestColors"]ListPlot3D[data, Mesh -> None, InterpolationOrder -> 3, ColorFunction -> "SouthwestColors"]スコープ (29)
一般的なデータ (9)
値からなる正則データの場合,
と
の範囲は整数値であると解釈される:
ListPlot3D[Table[Sin[x y], {x, 0, 3, 0.1}, {y, 0, 3, 0.1}]]DataRangeを使って明示的な
および
のデータ範囲を提供する:
ListPlot3D[Table[Sin[x y], {x, 0, 3, 0.1}, {y, 0, 3, 0.1}], DataRange -> {{0, 3}, {0, 3}}]ListPlot3D[Table[a Sin[x y], {a, {-1, 1}}, {x, 0, 3, 0.1}, {y, 0, 3, 0.1}], PlotStyle -> {Green, Yellow}]
の組からなる非正則データの場合,
と
のデータ範囲はデータから推測される:
data = Table[{x = RandomReal[{-1, 1}], y = RandomReal[{-1, 1}], x ^ 2 - y ^ 2}, {300}];ListPlot3D[data, BoxRatios -> Automatic, Mesh -> All]data1 = Table[{x = RandomReal[{-1, 1}], y = RandomReal[{-1, 1}], x ^ 2 - y ^ 2}, {300}];data2 = Table[{x = RandomReal[{-1, 1}], y = RandomReal[{-1, 1}], y ^ 2 - x ^ 2}, {300}];ListPlot3D[{data1, data2}, BoxRatios -> Automatic, PlotStyle -> {Cyan, Red}, Mesh -> All]ListPlot3D[ReplacePart[Partition[Range[100], 10], {{3, 3} -> None, {5, 7} -> I, {8, 4} -> Missing["NotAvailable"]}], Mesh -> All]ListPlot3D[Table[{x = RandomReal[{-1, 1}], y = RandomReal[{-1, 1}], Sqrt[1 - x ^ 2 - y ^ 2]}, {1000}]]MaxPlotPointsを使って使用する点の数を制限する:
data = Table[Sin[x y], {x, 0, 3, 0.075}, {y, 0, 3, 0.075}];Table[ListPlot3D[data, MaxPlotPoints -> mp, Mesh -> All], {mp, {Infinity, 25, 10}}]PlotRangeは自動的に選択される:
ListPlot3D[Table[1 / (x ^ 2 + y ^ 2), {x, -2, 2, 4 / 51}, {y, -2, 2, 4 / 51}]]PlotRangeを使って関心領域に焦点を当てる:
{ListPlot3D[Table[x ^ 4 + y ^ 4 - x ^ 2 - y ^ 2 + 1, {x, -2, 2, 0.1}, {y, -2, 2, 0.1}]], ListPlot3D[Table[x ^ 4 + y ^ 4 - x ^ 2 - y ^ 2 + 1, {x, -2, 2, 0.1}, {y, -2, 2, 0.1}], PlotRange -> {0, 2}, ClippingStyle -> None]}RegionFunctionを使って不等式で与えられる領域のみに曲面を制限する:
data = Flatten[Table[{x, y, Sin[x ^ 2 + y ^ 2] / (x ^ 2 + y ^ 2)}, {x, -4, 4, 0.2}, {y, -4, 4, 0.2}], 1];//QuietListPlot3D[data, PlotRange -> All, RegionFunction -> Function[{x, y, z}, Norm[{x, y}] < 4]]表形式データ (1)
tabular = Tabular[Association["RawSchema" -> Association["ColumnProperties" ->
Association["x" -> Association["ElementType" -> "Real64"],
"y" -> Association["ElementType" -> "Real64"], "f" -> Association["ElementType" -> "Real64"],
"g" -> Association["ElementType" -> "Real64"]], "KeyColumns" -> None,
"Backend" -> "WolframKernel"], "Options" -> {},
"BackendData" -> Association["ColumnData" -> DataStructure["ColumnTable",
{{TabularColumn[Association["Data" -> {{-0.33582559210197255, 0.8803676729681109,
-0.003450317591317193, -0.5776054861233806, -0.18944540146303104, 0.08137938087842855,
0.7104751091887305, -0.7249989427695543, 0.7189171513953225, 0.07484856016827364,
0.08394237912410371, -0.8397091750258563, -0.34613065738227494, 0.3153135739547788,
0.1915099877033827, 0.6156751086440714, -0.6764522289849321, 0.42594752908865297,
0.5452064158161848, -0.20490357958422162, 0.2656442175819875, 0.5930624991868867,
-0.7653974593098988, -0.405399907196919, 0.4261842168600495, 0.007537997753683873,
0.02320951605378001, 0.029467822857674145, -0.7726538362038052, -0.8906519148256042,
-0.38273234260173566, -0.04463951504268252, -0.16350850917765758, 0.4690419314081237,
-0.07389578232631427, -0.17270808669527418, -0.5037831593577057, -0.03935310416421582,
0.15289554619000345, 0.4761074052545588, 0.01960730503071178, 0.346592918693779,
-0.47057706227574775, -0.35440713666529167, -0.34731051462701956, -0.0457101610377397,
0.04848867532803812, 0.04010379877047812, 0.36938420883956324, -0.10815861126341457,
0.6830059609993497, -0.03055755892317922, 0.052870816573050865, 0.179789625890681,
0.023635433559453523, -0.030528341731038623, -0.21544153070879574, 0.5826821668876411,
-0.20600453971631344, -0.42604275708726047, -0.3929283758555415, -0.5043728799993309,
0.04899025018573085, -0.6259318276915798, -0.7385675893002966, 0.02511690116030315,
-0.4164641437703871, -0.44641422111020956, 0.05742014701654436, 0.18026818253918503,
-0.25393260418265173, 0.6021117017355871, 0.37177688919047097, 0.11360855924293391,
-0.25955329915886216, 0.5489751164992835, 0.23958190188503348, 0.39276345483198566,
0.3478442618183317, -0.3456381030733422, 0.4225740854243536, 0.050722540211116975,
-0.4339376582341843, -0.8928688667944833, 0.2875870676301678, 0.04838535997016681,
0.17191625353893386, -0.040332095223106545, 0.2979213513808396, -0.25100379031925163,
0.018748029889601718, 0.3372233005229358, 0.5402016231417128, 0.05153948798389716,
0.06657679195492089, 0.507705731340098, 0.23183070367402803, 0.17700860995773013,
-0.46345961004467046, -0.6014722768342563, -0.3922042067620207, 0.46797042738344224,
-0.6158846471708826, -0.21699658897203888, -0.5884939906085117, 0.5155817648259232,
0.038469952543080936, -0.5307883875682963, 0.09721123850987222, 0.3363794736422771,
0.03788984473431475, -0.48615099167870535, 0.03748937070711202, 0.5612941694265542,
0.07205272450151311, 0.30972359067445165, -0.14344517208631288, -0.09100952129998968,
-0.6066500430261582, -0.22052556751928473, 0.47003854859072286, 0.1595273318284402,
-0.03860225460772638, 0.5251973641127975, -0.30222122163790915, -0.040424594644161975,
0.3704616954568948, 0.375203639020476, -0.15731117999349786, -0.5402663560146413,
0.0017958271756500443, 0.7042906004786842, -0.2581690297697128, -0.7406702017442801,
0.7443264602887835, -0.5384351417571395, 0.1597222348452349, 0.3260164469009681,
0.18083274349158138, 0.33096472385489184, -0.6405785635713598, 0.2571675133342489,
0.41891532310320506, -0.18246530531294006, 0.5807105548239027, 0.01799972403389352,
-0.02399787933864095, 0.3512402551683941, -0.12710039402331913, -0.14875144251467443,
0.4836386106491894, 0.4045689471949738, -0.389211183018424, -0.4132772147311336,
0.4888407559699957, -0.3951245745675573, -0.7165591324044193, -0.20907255373597197,
-0.22856965055876172, -0.3673381942839634, -0.1410469034783053, -0.009661409233815388,
-0.39919895738938344, -0.37096936498542143, 0.662931082598076, -0.016494755798288147,
0.33106254724578527, 0.5559302765103005, -0.1895047357455171, 0.4457984306185924,
-0.39170159845212427, 0.7480628908636631, 0.5124033874417243, 0.7707606882795327,
-0.1872735900152881, 0.585417550107661, -0.3063201531061375, 0.5852948104227167,
0.5850235449060104, -0.2176121958842699, -0.6984400530394087, 0.03257926667939274,
-0.9384991346972504, -0.0591697 ... Type" -> "Real64"]], TabularColumn[
Association["Data" -> {{0.8939921590638151, 0.09599126606056499, -1.4461887698687872,
0.3574534768754277, -1.121171318799583, -0.33073336818577137, 0.9259094587267503,
0.042022916683887426, 0.892305825288878, -0.5540058901593593, -0.03510132460611314,
0.18571071889023255, -0.2772288527592096, -0.7716551383714281, 0.4068956517806689,
0.36221629323967275, 0.8982381800002951, -0.40620115298861925, 0.3054024974923232,
-0.6163159803789945, -0.07859957322062693, 0.28549955900599683, 0.3312036742634056,
0.26331224460193225, -0.05870202519594381, 0.00031555230999197326,
-0.7436146779660238, -1.14390630001407, 0.1411388081014004, 0.046792707579414866,
-0.3774362463202895, 0.022381136398829594, -0.4960159800986063, 0.3796350869710431,
-1.138603222451506, -0.23455582228395613, 0.2659092692654318, -1.183528195744674,
-0.4791210452818651, -0.29303339287164004, -0.5211330588561782, -0.13502698285089174,
0.7870363346872017, 0.8982544467986264, -0.22914999050005214, -0.2479061783114385,
-0.4347495019488776, -0.08331096396423883, 0.8772708961908716, -0.27178839713175307,
0.9483092790315122, -0.4724839296008851, -1.0909555502232477, -0.9408472343160451,
-1.3960488289616102, -0.5202140745791314, -0.19832524998359002, 0.7868474016813832,
0.35042789273021696, -0.22195854339794094, 1.0239338679811123, 1.241797268360188,
-1.0053256713543575, 0.8794698395861581, 0.646958311741143, -0.30533288076463466,
-0.12791364372821087, 0.5168966892467696, -0.854322017990838, 0.3237507945931768,
-0.3365136569790853, -0.07542508011071905, -0.1896622911757588, -0.8151518333271205,
-0.785903912584512, 0.9943540702594823, -0.09970798805958633, 0.8155460093130154,
0.2517100213619473, -0.5074402739814479, 1.054331521209021, -0.37095280525637275,
-0.0033124165376286503, 0.00810519783609609, 0.604491487382795, -1.087039179804143,
0.3217896701925536, -0.9757724909993218, -0.5296157669589694, -0.44353010018306926,
-0.9772156827519269, 0.9974526044782488, 1.0401382798005163, -1.333826721300462,
-1.1657073859193974, 0.5988738776781478, -0.46515644169593257, -0.06189485735399641,
0.43024118140166445, -0.005056861065915311, 0.4969647835990133, 1.2389334026274614,
1.0969746972416095, 0.2699914383982267, -0.007263249176729766, 0.025694595799883486,
0.009334789628101163, 0.3959739514237559, -0.6919031699208391, -0.5727673459546412,
-0.7526649101588971, 0.37676652058113047, -1.1097067424942098, 0.7907395601868871,
-0.9921651497523799, -0.7285869946231459, -0.8828106067813857, -0.062486591022684154,
0.5791694114075633, -0.3234808446001126, -0.29576406882665246, -0.7873078267171731,
-1.0345538770658507, 0.6447352486264667, -0.09256576962703741, -0.9165601254045901,
-0.11276989000586415, 0.1559393927752605, -0.6024250703013618, 0.14448974619397612,
-0.04760739467769851, 0.7709694771458564, -0.014742247510236057, 0.23626276607833294,
0.6638730651502748, -0.03186729016669311, -1.0357092218146797, 0.6433340083061274,
-0.9411413021162254, 0.4909973640778654, 0.7189944529089185, 0.11055457421211713,
1.267850511973201, -0.9438375692417983, 0.17379076568211732, -0.10851220031896575,
-1.2713361573907198, 0.3346883790200734, -0.0621077599435433, -0.04321780837452255,
-0.18862788259467456, 0.021760098075714426, 0.8532897115032967, -0.28556892622426977,
0.15408641950632404, -0.1714149113043416, 0.39533058049223047, -0.4397787874261183,
-0.9441709999324307, 0.6380059863875251, -1.079304150111603, -0.015220209887687373,
0.04287582799227833, -0.36459460042586384, 1.085392552357007, -1.4351301279221556,
-0.2639348179992805, 1.0262808227866909, -0.6574884811876281, 0.03985598924795783,
-0.3005474803479229, 0.6683106567979948, -0.23062780939455543, 0.5666187686239714,
0.37219192126078904, -0.02563679932918994, 0.4429249457425396, -0.04381111047074612,
0.187906287726331, -0.9973413808733808, 0.00426805123864777, -0.12866722429447683,
0.00749480936676912, -0.8515711317056425, -0.08786646448345839, 0.2606608909833542,
0.9058373813263996, 0.11471040362679649, 0.019510758576114784, 0.07867647334176021,
0.018095050021316034, -0.9234813248766701, 0.27933341322409344, -0.6676322195851319,
-0.4217872567696394, -0.810239936029394, -0.9402166292180882, 0.17133206921427285,
1.2481069003723113, 0.9831436029884254}, {}, None}, "ElementType" -> "Real64"]]}}]]]];列 x と列 y の上に列 f の陰影付き密度プロットをプロットする:
ListPlot3D[tabular -> {"x", "y", "f"}]ListPlot3D[tabular -> {{"x", "y", "f"}, {"x", "y", "g"}}]ListPlot3D[tabular -> {{"x", "y", "f"}, {"x", "y", "g"}}, PlotLegends -> {"f", "g"}]特別なデータ (4)
Quantityを使って単位付きのデータを含める:
ListPlot3D[Quantity[RandomReal[1, {6, 3}], "Meters"], AxesLabel -> Automatic]data = UnitSimplify[Flatten[Table[{m, a, m a}, {m, Quantity[0, "Grams"], Quantity[10, "Grams"]}, {a, Quantity[0, "Meters"/"Seconds"^2], Quantity[10, "Meters"/"Seconds"^2]}], 1]];ListPlot3D[data, AxesLabel -> Automatic]zvar = Table[Around[Sin[x] Cos[y], 1], {x, -4, 4}, {y, -4, 4}];ListPlot3D[zvar]xyzvar3D =
Flatten[Table[{Around[x, 1], Around[y, 1],
Around[Sin[x] Cos[y], 1]}, {x, -4, 4}, {y, -4, 4}], 1];ListPlot3D[xyzvar3D]ラベル付けと凡例 (6)
Labeledで曲面にラベルを付ける:
data = Join@@Table[{x, y, Sin[x + Cos[y]]}, {x, -3, 3}, {y, -3, 3}];ListPlot3D[Labeled[data, "label"]]PlotLabelsで曲面にラベルを付ける:
data = Join@@Table[{x, y, Sin[x + Cos[y]]}, {x, -3, 3}, {y, -3, 3}];ListPlot3D[data, PlotLabels -> Sin[x + Cos[y]]]data = Join@@Table[{x, y, Sin[x + Cos[y]]}, {x, -3, 3}, {y, -3, 3}];ListPlot3D[Labeled[data, "label", {0, 0}]]Calloutを使う:
ListPlot3D[Callout[data, "label", {0, 0}]]data = Join@@Table[{x, y, Sin[x + Cos[y]]}, {x, -3, 3}, {y, -3, 3}];ListPlot3D[Callout[data, "label", {2, 0, 1}]]data1 = Join@@Table[{x, y, x ^ 2 + y ^ 2}, {x, -3, 3}, {y, -3, 3}];
data2 = Join@@Table[{x, y, -x ^ 2 - y ^ 2}, {x, -3, 3}, {y, -3, 3}];ListPlot3D[{data1, data2}, PlotLegends -> {HoldForm[x ^ 2 + y ^ 2], HoldForm[-x ^ 2 - y ^ 2]}]Legendedを使って特定のデータ集合の凡例を与える:
data1 = Table[{x = RandomReal[{-1, 1}], y = RandomReal[{-1, 1}], x ^ 2 - y ^ 2}, {300}];data2 = Table[{x = RandomReal[{-1, 1}], y = RandomReal[{-1, 1}], y ^ 2 - x ^ 2}, {300}];ListPlot3D[{data1, Legended[data2, HoldForm[y^2 - x^2]]}, BoxRatios -> Automatic, PlotStyle -> {Green, Yellow}]Placedを使って凡例の場所を変える:
ListPlot3D[{data1, Legended[data2, Placed[HoldForm[y^2 - x^2], Above]]}, BoxRatios -> Automatic, PlotStyle -> {Green, Yellow}]プレゼンテーション (9)
曲面に明示的なPlotStyleを与える:
ListPlot3D[Table[Sin[j ^ 2 + i], {i, -3, 3, 0.05}, {j, -3, 3, 0.05}], PlotStyle -> Directive[Orange, Specularity[White, 20]], Mesh -> None]data1 = Table[Sqrt[1 - x ^ 2 - y ^ 2], {x, -1, 1, 0.05}, {y, -1, 1, 0.05}];data2 = Table[-Sqrt[1 - x ^ 2 - y ^ 2], {x, -1, 1, 0.05}, {y, -1, 1, 0.05}];ListPlot3D[{data1, data2}, PlotStyle -> {Yellow, Cyan}, BoxRatios -> Automatic, DataRange -> {{-1, 1}, {-1, 1}}]ListPlot3D[Table[Sin[i + j ^ 2], {i, 0, 3, 0.1}, {j, 0, 3, 0.1}], AxesLabel -> {j, i}, PlotLabel -> Sin[i + j ^ 2], PlotStyle -> Purple]ListPlot3D[Table[Sin[i + j ^ 2], {i, 0, 3, 0.1}, {j, 0, 3, 0.1}], ColorFunction -> Function[{x, y, z}, Hue[z]]]ListPlot3D[Table[Sin[i + j ^ 2], {i, 0, 3, 0.1}, {j, 0, 3, 0.1}], Mesh -> 8, ColorFunction -> "SolarColors", MeshFunctions -> {Function[{x, y, z}, z]}]ListPlot3D[Table[Sin[i + j ^ 2], {i, 0, 3, 0.1}, {j, 0, 3, 0.1}], Mesh -> 8, MeshShading -> {{Blue, Green}, {Cyan, Purple}}]曲面にインタラクティブなTooltipを与える:
ListPlot3D[Tooltip[Table[Sin[i + j ^ 2], {i, 0, 3, 0.1}, {j, 0, 3, 0.1}], TraditionalForm@Sin[i + j ^ 2]], PlotStyle -> Darker[Green]]ListPlot3D[Table[Sin[i + j ^ 2], {i, 0, 3, 0.1}, {j, 0, 3, 0.1}], Filling -> Bottom, FillingStyle -> Directive[Opacity[0.6], Blue], PlotStyle -> Red]ListPlot3D[Table[Sin[i + j ^ 2], {i, -3, 3, 0.05}, {j, -3, 3, 0.05}], PlotTheme -> "Web"]オプション (122)
BoundaryStyle (6)
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}]]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], BoundaryStyle -> Thick, Mesh -> None]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], BoundaryStyle -> Directive[Red, Thick], Mesh -> None]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], BoundaryStyle -> None, Mesh -> 5]BoundaryStyleはRegionFunctionで切り取られた穴に適用される:
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], BoundaryStyle -> Thick, RegionFunction -> Function[{x, y, z}, Abs[z] ≥ 0.25], Mesh -> None]BoundaryStyleは曲面がジャンプしている部分に適用される:
ListPlot3D[{{10, 10, 1}, {6, 8, 10}, {7, 9, 9}, {1, 1, 2}, {4, 6, 4}, {7, 4, 9}, {10, 6, 8}}, InterpolationOrder -> 0, BoundaryStyle -> Thick, Mesh -> None]ClippingStyle (4)
data = Flatten[Table[{x, y, Re[Sin[x + I y]]}, {x, -2Pi, 2Pi, 0.2}, {y, -2Pi, 2Pi, 0.2}], 1];ListPlot3D[data, Mesh -> None, PlotStyle -> Orange]data = Flatten[Table[{x, y, Re[Sin[x + I y]]}, {x, -2Pi, 2Pi, 0.2}, {y, -2Pi, 2Pi, 0.2}], 1];ListPlot3D[data, ClippingStyle -> None, Mesh -> None, PlotStyle -> Orange]data = Flatten[Table[{x, y, Re[Sin[x + I y]]}, {x, -2Pi, 2Pi, 0.2}, {y, -2Pi, 2Pi, 0.2}], 1];ListPlot3D[data, ClippingStyle -> Opacity[0.5], Mesh -> None, PlotStyle -> Orange]data = Flatten[Table[{x, y, Re[Sin[x + I y]]}, {x, -2Pi, 2Pi, 0.2}, {y, -2Pi, 2Pi, 0.2}], 1];ListPlot3D[data, ClippingStyle -> {Red, Blue}, Mesh -> None, PlotStyle -> Orange]ColorFunction (6)
Table[ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], ColorFunction -> Function[{x, y, z}, Evaluate[f]], PlotLabel -> f, Mesh -> None], {f, {Hue[x], Hue[y], Hue[z]}}]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], ColorFunction -> Function[{x, y, z}, RGBColor[x, y, 0.]], Mesh -> None]定義済みの色グラデーションにColorDataを使う:
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], ColorFunction -> (ColorData["DarkRainbow"][#1]&)]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], ColorFunction -> "DarkRainbow"]ColorFunctionはPlotStyleよりも優先順位が高い:
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], ColorFunction -> "DarkRainbow", PlotStyle -> Directive[Opacity[0.5], Red]]ColorFunctionはMeshShadingよりも優先順位が低い:
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], ColorFunction -> Hue, MeshShading -> {{Automatic, None}, {None, Automatic}}]ColorFunctionScaling (2)
data = Flatten[Table[{x, y, Abs[Sin[x + I y]]}, {x, -2Pi, 2Pi, Pi / 5}, {y, -2, 2, 1 / 5}], 1];ListPlot3D[data, ColorFunction -> Function[{x, y, z}, Hue@Rescale[Arg[Sin[x + I y]], {-Pi, Pi}]], ColorFunctionScaling -> False]スケールされていない座標はDataRangeに依存する:
data = Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}];ListPlot3D[data, ColorFunction -> Function[{x, y, z}, RGBColor[x, y, 0]], ColorFunctionScaling -> False]ListPlot3D[data, ColorFunction -> Function[{x, y, z}, RGBColor[x, y, 0]], ColorFunctionScaling -> False, DataRange -> {{0, 1}, {0, 1}}]DataRange (5)
ListPlot3D[Table[Sin[i + j], {i, 0, 2Pi, 0.1}, {j, 0, 2Pi, 0.1}]]ListPlot3D[Table[Sin[i + j], {i, 0, 2Pi, 0.1}, {j, 0, 2Pi, 0.1}], DataRange -> {{0, 2Pi}, {0, 2Pi}}]ListPlot3D[{Array[Times, {20, 20}], Array[100&, {5, 5}]}, DataRange -> {{0, 1}, {0, 1}}, PlotRange -> All, PlotStyle -> {Red, Blue}, Mesh -> All]data = Flatten[Table[{i, j, Sin[i + j]}, {j, 0, 2Pi, 0.5}, {i, -3, 3}], 1];ListPlot3D[data, Mesh -> All]data = Table[Sin[i + j], {j, 0, 2Pi, 0.5}, {i, -1, 1}];ListPlot3D[data, DataRange -> All, Mesh -> All, PlotRange -> All]ListPlot3D[data, Mesh -> All, PlotRange -> All]Filling (5)
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], Filling -> Bottom, Mesh -> None]RegionFunctionで切り取られた範囲に沿って塗り潰しが起る:
ListPlot3D[Table[Sin[j ^ 2 + i], {i, -Pi, Pi, 0.2}, {j, -Pi, Pi, 0.2}], Filling -> Bottom, RegionFunction -> (#1 ^ 2 + #2 ^ 2 < 5&), DataRange -> {{-Pi, Pi}, {-Pi, Pi}}, Mesh -> None]ListPlot3D[Table[Sin[j ^ 2 + i], {i, -Pi, Pi, 0.2}, {j, -Pi, Pi, 0.2}], Filling -> {1 -> Top, 1 -> Bottom}, RegionFunction -> (#1 ^ 2 + #2 ^ 2 < 5&), DataRange -> {{-Pi, Pi}, {-Pi, Pi}}]ListPlot3D[Table[Cos[y] + a, {a, {-1, 1}}, {x, 0, 2Pi}, {y, 0, 2Pi}], Filling -> {1 -> {Bottom, Blue}, 2 -> {Top, Red}}]ListPlot3D[RandomReal[{}, {10, 3}], InterpolationOrder -> 0, Filling -> Bottom, Mesh -> None]FillingStyle (3)
Table[ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], Filling -> Bottom, FillingStyle -> fs], {fs, {Opacity[0.5], Orange}}]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], Filling -> 0, FillingStyle -> {Red, Blue}]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], Filling -> 0, FillingStyle -> {None, Blue}]InterpolationOrder (5)
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.5}, {j, 0, Pi, 0.5}], PlotRange -> All, Mesh -> All]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.5}, {j, 0, Pi, 0.5}], Mesh -> None, InterpolationOrder -> 0, PlotRange -> All]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.5}, {j, 0, Pi, 0.5}], Mesh -> None, InterpolationOrder -> 3, PlotRange -> All]Table[ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.5}, {j, 0, Pi, 0.5}], Mesh -> None, InterpolationOrder -> i, Mesh -> Full, PlotLabel -> i, PlotRange -> All], {i, 0, 5}]不規則データについては,零次補間は各点についてボロノイ(Voronoi)領域を与える:
data = Flatten[Table[{r Sin[t], r Cos[t], Sqrt[r t]}, {t, 0, 2Pi, 0.5}, {r, 0, 2, 0.5}], 1];ListPlot3D[data, Mesh -> All]ListPlot3D[data, Mesh -> All, InterpolationOrder -> 0]IntervalMarkers (2)
zvar = Table[Around[Sin[x] Cos[y], 1], {x, -4, 4}, {y, -4, 4}];ListPlot3D[zvar]名前付きのIntervalMarkersを使う:
xyzvar = Flatten[
Table[{x, y, Around[Sin[x] Cos[y], 1]}, {x, -4, 4}, {y, -4, 4}], 1];ListPlot3D[xyzvar, IntervalMarkers -> "Tubes"]IntervalMarkersStyle (2)
zvar = Table[Around[Sin[x] Cos[y], 1], {x, -4, 4}, {y, -4, 4}];ListPlot3D[zvar]IntervalMarkersStyleを使って棒のスタイルを指定する:
xyzvar = Flatten[
Table[{x, y, Around[Sin[x] Cos[y], 1]}, {x, -4, 4}, {y, -4, 4}], 1];ListPlot3D[xyzvar, IntervalMarkersStyle -> Red]LabelingSize (2)
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], PlotLabels -> "maximum point"]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], PlotLabels -> "maximum point", LabelingSize -> 30]label = [image];ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], PlotLabels -> label]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], PlotLabels -> label, LabelingSize -> 60]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], PlotLabels -> label, LabelingSize -> Full]MaxPlotPoints (4)
ListPlot3Dは通常データに含まれるすべての点を使う:
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], Mesh -> All]data = Table[{x = RandomReal[Pi], y = RandomReal[Pi], Sin[x ^ 2 + y]}, {500}];ListPlot3D[data, Mesh -> All]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], MaxPlotPoints -> 10, Mesh -> All]MaxPlotPointsは不規則データに構造格子を強制する:
data = Table[{x = RandomReal[Pi], y = RandomReal[Pi], Sin[x ^ 2 + y]}, {500}];ListPlot3D[data, Mesh -> All, MaxPlotPoints -> 10]data = Select[Table[{x = RandomReal[Pi], y = RandomReal[Pi], 0}, {500}], Norm[#] < Pi&];ListPlot3D[data, Mesh -> All, MaxPlotPoints -> 10, ViewPoint -> Above]Mesh (7)
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], Mesh -> None]data = Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.25}, {j, 0, Pi, 0.25}];{ListPlot3D[data, Mesh -> Full], ListPlot3D[data, Mesh -> All]}不規則データのメッシュ全体がドロネー(Delaunay)三角分割である:
data = Table[{x = RandomReal[3], y = RandomReal[3], Sin[x ^ 2 + y]}, {100}];ListPlot3D[data, Mesh -> All]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], Mesh -> 5]
方向に3本のメッシュライン,
方向に6本のメッシュラインを使う:
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], Mesh -> {3, 6}]data = Flatten[Table[{i, j, Sin[i ^ 2 + j]}, {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], 1];ListPlot3D[data, Mesh -> {{1, 2}, {Pi / 2}}]data = Flatten[Table[{i, j, Sin[i ^ 2 + j]}, {i, -2, 2, 0.1}, {j, -2, 2, 0.1}], 1];ListPlot3D[data, Mesh -> {{{0, Thick}}, {{0, Red}}}]MeshFunctions (3)
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], MeshFunctions -> {#3&}, Mesh -> 5]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], MeshFunctions -> {#1&, #2&}, Mesh -> {5, 5}]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], MeshFunctions -> {Sqrt[#1 ^ 2 + #2 ^ 2 + #3 ^ 2]&}, Mesh -> 5]MeshShading (4)
Noneを使って部分を削除する:
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], Mesh -> 10, MeshFunctions -> {#3&}, MeshShading -> {Red, None}]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], Mesh -> 7, MeshFunctions -> {#1&, #2&}, MeshShading -> {{Yellow, Green}, {Green, Yellow}}]MeshShadingはPlotStyleよりも優先順位が高い:
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], Mesh -> 7, PlotStyle -> Red, MeshShading -> {{Green, Automatic}, {Automatic, Green}}]MeshShadingはColorFunctionよりも優先順位が高い:
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], Mesh -> 10, MeshFunctions -> {#1&, #2&}, MeshShading -> {{None, Automatic}, {Automatic, None}}, ColorFunction -> "DarkRainbow"]MeshStyle (2)
NormalsFunction (4)
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.2}, {j, 0, Pi, 0.2}], Mesh -> None]Noneを使ってすべての多角形に平面的な陰影付けを行う:
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.2}, {j, 0, Pi, 0.2}], NormalsFunction -> None, Mesh -> None]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.2}, {j, 0, Pi, 0.2}], Mesh -> None, NormalsFunction -> Function[{x, y, z}, RandomReal[{0, 1}, {3}]]]VertexNormalsはNormalsFunctionよりも優先順位が高い:
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.2}, {j, 0, Pi, 0.2}], Mesh -> None, NormalsFunction -> Function[{x, y, z}, RandomReal[{0, 1}, {3}]], VertexNormals -> Table[{i / 16, Sin[i j], j / 16}, {1}, {i, 16}, {j, 16}]]PerformanceGoal (2)
data = Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.02}, {j, 0, Pi, 0.02}];Timing[ListPlot3D[data, PerformanceGoal -> "Quality"]]data = Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.02}, {j, 0, Pi, 0.02}];Timing[ListPlot3D[data, PerformanceGoal -> "Speed"]]PlotFit (4)
ListPlot3D[IconizedObject[«data»]]ListPlot3D[IconizedObject[«data»], PlotFit -> Automatic]ListPlot3D[IconizedObject[«data»], PlotFit -> "Quadratic"]KernelModelFitを使ってデータを近似する:
ListPlot3D[IconizedObject[«data»], PlotFit -> "Kernel"]PlotFitElements (4)
ListPlot3D[ResourceData["Sample Tabular Data: Car Models"] -> {"displacement", "horsepower", "mpg"}, PlotFit -> Automatic]ListPlot3D[ResourceData["Sample Tabular Data: Car Models"] -> {"displacement", "horsepower", "mpg"}, PlotFit -> Automatic, PlotFitElements -> "DataPoints"]データの信頼曲面をプロットする.デフォルトでは,信頼水準は0.95である:
ListPlot3D[ResourceData["Sample Tabular Data: Car Models"] -> {"displacement", "horsepower", "mpg"}, PlotFit -> Automatic, PlotFitElements -> "BandSurfaces"]ListFitPlot3D[ResourceData["Sample Tabular Data: Car Models"] -> {"displacement", "horsepower", "mpg"}, PlotFit -> Automatic, PlotFitElements -> {"BandSurfaces", <|"ConfidenceLevel" -> 0.5|>}]ListFitPlot3D[ResourceData["Sample Tabular Data: Car Models"] -> {"displacement", "horsepower", "mpg"}, PlotFit -> Automatic, PlotFitElements -> "Residuals"]ListFitPlot3D[ResourceData["Sample Tabular Data: Car Models"] -> {"displacement", "horsepower", "mpg"}, PlotFit -> Automatic, PlotFitElements -> {"DataPoints", {"Residuals", <|"Style" -> Black|>}}]PlotLabels (3)
ListPlot3D[Table[Sin[j ^ 2 + i], {i, -Pi, Pi, 0.1}, {j, -2, 2, 0.1}], PlotLabels -> HoldForm[-x ^ 2 - y ^ 2]]ListPlot3D[Table[-x ^ 2 - y ^ 2, {x, -2, 2}, {y, -2, 2}], PlotLabels -> Callout[HoldForm[-x ^ 2 - y ^ 2], {4, 3}]]ListPlot3D[Table[Sin[j ^ 2 + i + θ], {θ, {0, π / 2}}, {i, 0, Pi, 0.2}, {j, 0, Pi, 0.2}], PlotLabels -> {Callout["surface 1", Above], Callout["surface 2", {12, 10}]}]PlotLegends (5)
ListPlot3D[Table[Sin[j ^ 2 + i + θ], {θ, {0, π / 2}}, {i, 0, Pi, 0.2}, {j, 0, Pi, 0.2}], PlotLegends -> Automatic]ListPlot3D[Table[Sin[j ^ 2 + i + θ], {θ, {0, π / 2}}, {i, 0, Pi, 0.2}, {j, 0, Pi, 0.2}], PlotLegends -> {"one", "two"}]Placedを使って凡例位置を制御する:
ListPlot3D[Table[Sin[j ^ 2 + i + θ], {θ, {0, π / 2}}, {i, 0, Pi, 0.2}, {j, 0, Pi, 0.2}], PlotLegends -> Placed[Automatic, Below]]SwatchLegendを使って外観を変える:
ListPlot3D[Table[Sin[j ^ 2 + i + θ], {θ, {0, π / 2}}, {i, 0, Pi, 0.2}, {j, 0, Pi, 0.2}], PlotLegends -> SwatchLegend[Automatic, {"surf1", "surf2"}, LegendFunction -> "Frame", LegendMargins -> 10]]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.2}, {j, 0, Pi, 0.2}], ColorFunction -> "Rainbow", PlotLegends -> Automatic]BarLegendを使って外観を変える:
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.2}, {j, 0, Pi, 0.2}], ColorFunction -> "Rainbow", PlotLegends -> BarLegend[Automatic, LegendMarkerSize -> 100]]PlotRange (3)
ListPlot3D[Table[1 / (x ^ 2 + y ^ 2), {x, -2, 2, 4 / 51}, {y, -2, 2, 4 / 51}]]ListPlot3D[Table[1 / (x ^ 2 + y ^ 2), {x, -2, 2, 4 / 51}, {y, -2, 2, 4 / 51}], PlotRange -> All]ListPlot3D[Table[y ^ 2 - x ^ 2, {x, -4, 4, 0.5}, {y, -4, 4, 0.5}], PlotRange -> {-2, 2}]PlotStyle (6)
ListPlot3D[{Table[x, {x, 20}, {y, 20}], Table[y, {x, 15}, {y, 20}]}, PlotStyle -> {Pink, Green}]ListPlot3D[Table[Sin[j ^ 2 + i], {i, -Pi, Pi, 0.1}, {j, -2, 2, 0.1}], PlotStyle -> Purple]Specularity を使ってハイライトする:
ListPlot3D[Table[Sin[j ^ 2 + i], {i, -Pi, Pi, 0.1}, {j, -2, 2, 0.1}], PlotStyle -> Directive[Purple, Specularity[White, 50]]]Opacityを使って透過的な曲面を得る:
ListPlot3D[Table[Sin[j ^ 2 + i], {i, -Pi, Pi, 0.1}, {j, -2, 2, 0.1}], PlotStyle -> Directive[Opacity[0.8], Purple, Specularity[White, 50]]]data1 = Table[Sqrt[1 - x ^ 2 - y ^ 2], {x, -1, 1, 0.1}, {y, -1, 1, 0.1}];data2 = Table[-Sqrt[1 - x ^ 2 - y ^ 2], {x, -1, 1, 0.1}, {y, -1, 1, 0.1}];ListPlot3D[{data1, data2}, PlotStyle -> {Red, Blue}, BoxRatios -> Automatic, DataRange -> {{-1, 1}, {-1, 1}}]ListPlot3D[Table[Sin[j ^ 2 + i], {i, -Pi, Pi, 0.1}, {j, -2, 2, 0.1}], PlotStyle -> None]PlotTheme (4)
ListPlot3D[Table[Sin[j ^ 2 + i], {i, -3, 3, 0.05}, {j, -3, 3, 0.05}], PlotTheme -> "Business"]ListPlot3D[Table[Sin[j ^ 2 + i], {i, -3, 3, 0.05}, {j, -3, 3, 0.05}], PlotTheme -> "Business", PlotStyle -> StandardRed]MeshとMeshShadingに変更を加えることで,外観を変える:
ListPlot3D[Table[Sin[j ^ 2 + i], {i, -3, 3, 0.05}, {j, -3, 3, 0.05}], PlotTheme -> "Business", Mesh -> 5, MeshShading -> {Yellow, Orange}]ListPlot3D[Table[Sin[j ^ 2 + i], {i, -3, 3, 0.05}, {j, -3, 3, 0.05}], DataRange -> {{-3, 3}, {-3, 3}}, PlotTheme -> "ThickSurface"]RegionFunction (5)
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], RegionFunction -> Function[{x, y, z}, Abs[z] > 0.5]]領域はDataRangeに依存する:
data = Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}];ListPlot3D[data, RegionFunction -> Function[{x, y, z}, Norm[{x, y}] < 4]]ListPlot3D[data, RegionFunction -> Function[{x, y, z}, Norm[{x, y}] < 4], DataRange -> {{0, Pi}, {0, Pi}}]Fillingは範囲の境界から塗り潰す:
ListPlot3D[Table[Sin[j ^ 2 + i], {i, -2, 2, 0.1}, {j, -2, 2, 0.1}], RegionFunction -> Function[{x, y, z}, 2 < x ^ 2 + y ^ 2 < 5], Filling -> Bottom, DataRange -> {{-2, 2}, {-2, 2}}]ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}], RegionFunction -> Function[{x, y, z}, 0 < Mod[x ^ 2 + y ^ 2, 2] < 1], DataRange -> {{0, Pi}, {0, Pi}}]ListPlot3D[Table[Exp[-(i ^ 2 + j ^ 2)], {i, -2, 2, 0.1}, {j, -2, 2, 0.1}], RegionFunction -> Function[{x, y, z}, x < 0 || y > 0], DataRange -> {{-2, 2}, {-2, 2}}]ScalingFunctions (9)
ListPlot3D[Table[Max[x, y], {x, 0, 10, .1}, {y, 0, 10, .1}]]ListPlot3D[Table[Max[x, y], {x, 0, 10, .1}, {y, 0, 10, .1}], ScalingFunctions -> {None, "Log"}]ListPlot3D[Table[Max[x, y], {x, 0, 10, .1}, {y, 0, 10, .1}], ScalingFunctions -> {None, "Reverse"}]ListPlot3D[Table[Max[x, y], {x, 0, 10, .1}, {y, 0, 10, .1}], ScalingFunctions -> {None, "Reciprocal"}, PlotRangePadding -> None]ListPlot3D[Table[Max[x, y], {x, 0, 10, .1}, {y, 0, 10, .1}], ScalingFunctions -> {"Reverse", "Log"}]ListPlot3D[Table[Max[x, y], {x, 0, 10, .1}, {y, 0, 10, .1}], ScalingFunctions -> {"Reverse", None}]ListPlot3D[Table[Max[x, y], {x, 0, 10, .1}, {y, 0, 10, .1}], ScalingFunctions -> {None, {-Log[#]&, Exp[-#]&}}]TicksとFaceGridsの中の位置は自動的にスケールされる:
ListPlot3D[Table[Max[x, y], {x, 0, 100, 1}, {y, 0, 100, 1}], ScalingFunctions -> {"Log", None}, Ticks -> {2 ^ Range[10], Automatic, Automatic}, FaceGrids -> All]PlotRangeは自動的にスケールされる:
ListPlot3D[Table[x ^ 2 + y ^ 2, {x, 0, 10.1}, {y, 0, 10, .1}], ScalingFunctions -> {None, "Log"}, PlotRange -> {5, 50}]TextureCoordinateFunction (4)
ListPlot3D[Table[Sin[i + j ^ 2], {i, 0, 3, 0.1}, {j, 0, 3, 0.1}], Mesh -> None, PlotStyle -> Texture[ExampleData[{"ColorTexture", "MultiSpiralsPattern"}]]]ListPlot3D[Table[Sin[i + j ^ 2], {i, 0, 3, 0.1}, {j, 0, 3, 0.1}], Mesh -> None, TextureCoordinateFunction -> ({#1, #3}&), PlotStyle -> Texture[ExampleData[{"ColorTexture", "MultiSpiralsPattern"}]]]ListPlot3D[Table[Sin[i + j ^ 2], {i, 0, 3, 0.1}, {j, 0, 3, 0.1}], DataRange -> {{0, 3}, {0, 3}}, Mesh -> None, TextureCoordinateScaling -> False, PlotStyle -> Texture[ExampleData[{"ColorTexture", "MultiSpiralsPattern"}]]]テクスチャを使ってパラメータがどのように曲面にマップされるかをハイライトする:
texture = ArrayPlot[{{1, 1, 1, 2, 1, 1}, {2, 0, 0, 2, 0, 0}, {2, 0, 0, 2, 0, 0}, {2, 1, 1, 1, 1, 1}, {2, 0, 0, 2, 0, 0}, {2, 0, 0, 2, 0, 0}}, ColorRules -> {1 -> Red, 2 -> Blue, 0 -> White}, Frame -> False, PlotRangePadding -> None, ImagePadding -> None, ImageSize -> 100]ListPlot3D[Table[Sin[i + j ^ 2], {i, 0, 3, 0.1}, {j, 0, 3, 0.1}], DataRange -> {{0, 3}, {0, 3}}, Mesh -> None, TextureCoordinateScaling -> False, PlotStyle -> Texture[texture]]TextureCoordinateScaling (1)
テクスチャにスケールされたあるいはスケールされていない座標を使う:
texture = ArrayPlot[{{1, 1, 1, 2, 1, 1}, {2, 0, 0, 2, 0, 0}, {2, 0, 0, 2, 0, 0}, {2, 1, 1, 1, 1, 1}, {2, 0, 0, 2, 0, 0}, {2, 0, 0, 2, 0, 0}}, ColorRules -> {1 -> Red, 2 -> Blue, 0 -> White}, Frame -> False, PlotRangePadding -> None, ImagePadding -> None, ImageSize -> 100]Table[ListPlot3D[Table[Sin[i + j ^ 2], {i, 0, 3, 0.1}, {j, 0, 3, 0.1}], DataRange -> {{0, 3}, {0, 3}}, Mesh -> None, TextureCoordinateScaling -> s, PlotStyle -> Texture[texture], PlotLabel -> s], {s, {True, False}}]VertexColors (3)
ListPlot3Dは通常色付けのない曲面を使う:
data = Flatten[Table[{x, y, Sin[x y]}, {x, 0, 3, 0.1}, {y, 0, 3, 0.1}], 1];ListPlot3D[data, Mesh -> None]data = Flatten[Table[{x, y, Sin[x y]}, {x, 0, 3, 0.1}, {y, 0, 3, 0.1}], 1];colors = Table[Hue[RandomReal[]], {31 31}];ListPlot3D[data, Mesh -> None, VertexColors -> colors]data = Table[a Sqrt[4 - x ^ 2 - y ^ 2], {a, {-1, 1}}, {x, -1, 1, 0.1}, {y, -1, 1, 0.1}];colors = Table[Hue[RandomReal[]], {21}, {21}];ListPlot3D[data, VertexColors -> {colors, colors}, Mesh -> None, BoxRatios -> Automatic, DataRange -> {{-1, 1}, {-1, 1}}]VertexNormals (3)
ListPlot3Dはその形状から自動的に曲面の法線を計算する:
data = Flatten[Table[{x, y, Sin[x y]}, {x, 0, 3, 0.1}, {y, 0, 3, 0.1}], 1];ListPlot3D[data, Mesh -> None, PlotStyle -> Directive[Purple, Specularity[White, 10]]]data = Flatten[Table[{x, y, Sin[x y]}, {x, 0, 3, 0.1}, {y, 0, 3, 0.1}], 1];normals = RandomReal[1, {31 31, 3}];ListPlot3D[data, Mesh -> None, VertexNormals -> normals, PlotStyle -> Directive[Purple, Specularity[White, 10]]]data = Table[a Sqrt[1 - x ^ 2 - y ^ 2], {a, {-1, 1}}, {x, -1, 1, 0.1}, {y, -1, 1, 0.1}];normals = Table[RandomReal[a, {21, 21, 3}], {a, {-1, 1}}];ListPlot3D[data, VertexNormals -> normals, Mesh -> None, BoxRatios -> Automatic, PlotStyle -> Directive[Purple, Specularity[White, 10]], DataRange -> {{-1, 1}, {-1, 1}}]アプリケーション (5)
data = Table[BesselJ[n, x], {x, 0, 10, .05}, {n, 0, 12}];ListPlot3D[data, DataRange -> {{0, 12}, {0, 10}}, Mesh -> {13, 0}, PlotStyle -> Yellow, AxesLabel -> {n, x}, PlotLabel -> BesselJ[n, x]]類似ステップの値を強調して,ロジスティック写像の反復を示す:
ListPlot3D[Table[NestList[3 # (1 - #)&, x, 10], {x, 0, 1, 0.005}], DataRange -> {{0, 10}, {0, 1}}, Mesh -> {Range[0, 10], 0}, AxesLabel -> {"steps", "initial"}, ColorFunction -> Hue, PlotRange -> All]特定の初期値の値を強調して,ロジスティック写像の反復を示す:
ListPlot3D[Table[NestList[3 # (1 - #)&, x, 10], {x, 0, 1, 0.005}], DataRange -> {{0, 10}, {0, 1}}, Mesh -> {0, Range[0, 1, 0.1]}, AxesLabel -> {"steps", "initial"}, ColorFunction -> Hue, PlotRange -> All]クレプシュ・ゴルダン(Clebsch–Gordan)係数を
と
の関数としてプロットする:
ListPlot3D[Table[ClebschGordan[{10, m1}, {20, m2}, {30, m1 + m2}], {m1, -10, 10}, {m2, -20, 20}], Mesh -> None]square[{{imin_, imax_}, {jmin_, jmax_}}] := Table[UnitStep[i - imin, imax - i]UnitStep[j - jmin, jmax - j], {i, 0, 20}, {j, 0, 20}]{ListPlot3D[square[{{2, 5}, {3, 7}}], Mesh -> None, PlotStyle -> Yellow], ListPlot3D[Abs@Fourier[square[{{2, 5}, {3, 7}}]], Mesh -> None, ColorFunction -> "Rainbow"]}都市の高度データを使ってコロラド州のカラーの高度マップを示す:
ListPlot3D[{CityData[#, "Longitude"], CityData[#, "Latitude"], CityData[#, "Elevation"]}& /@ CityData[{All, "Colorado", "UnitedStates"}], ColorFunction -> "Topographic", MeshFunctions -> {#3&}]特性と関係 (15)
ListPlot3Dは,補間関数曲面を作成する:
rdata = Table[Sin[u + v ^ 2], {u, 0, 3, .2}, {v, 0, 3, .2}];ListPlot3D[rdata, Mesh -> All]idata = Flatten[Table[{v Sin[u], v Cos[u], u}, {u, 0, 2Pi, 0.1}, {v, 0, 1, .2}], 1];ListPlot3D[idata, Mesh -> All]ListSurfacePlot3Dは近似一般曲面を作成する:
data1 = Flatten[Table[{Cos[ϕ] Sin[θ], Sin[ϕ] Sin[θ], -Cos[θ]}, {ϕ, 0., 2Pi, 0.4}, {θ, 0., Pi, 0.4}], 1];ListSurfacePlot3D[data1, Mesh -> All]ListPlot3Dは
方向に急速に振動する関数曲面を構築する:
ListPlot3D[data1, BoxRatios -> Automatic, Mesh -> None]各
,
値について複数の
値を使う場合,重複したものはListPlot3Dによって放棄される:
data2 = Flatten[Table[{Cos[ϕ] Sin[θ], Sin[ϕ] Sin[θ], Cos[θ]}, {ϕ, 0., 2Pi, (2Pi) / 25}, {θ, 0., Pi, Pi / 25}], 1];ListPlot3D[data2, BoxRatios -> Automatic, Mesh -> None]ListSurfacePlot3Dはそれでもなお一般曲面を再構成する:
ListSurfacePlot3D[data2]ListPlot3Dは,値,法線,色を多角形の頂点に関連付ける:
ListPlot3D[{{1, 2}, {3, 4}}, ColorFunction -> (Switch[Round[#3], 1, Red, 2, Green, 3, Blue, 4, Yellow]&), ColorFunctionScaling -> False, Mesh -> None]Graphics3D[Polygon[{{1, 1, 1}, {2, 1, 2}, {2, 2, 4}, {1, 2, 3}}, VertexColors -> {Red, Green, Yellow, Blue}], BoxRatios -> {1, 1, 0.4}, Lighting -> "Neutral"]Raster,ArrayPlot,MatrixPlot,ReliefPlotは,値を多角形全体に関連付ける:
ArrayPlot[{{1, 2}, {3, 4}}, ColorRules -> {1 -> Red, 2 -> Green, 3 -> Blue, 4 -> Yellow}]Graphics[Raster[Apply[List, {{Blue, Yellow}, {Red, Green}}, {2}]]]関数にPlot3Dを使う:
{Plot3D[Sin[x y], {x, 0, 3}, {y, 0, 3}], ListPlot3D[Table[Sin[x y], {y, 0, 3, 0.1}, {x, 0, 3, 0.1}]]}ListPointPlot3Dを使って三次元の点を示す:
ListPointPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}]]ListLinePlot3Dを使って点のリストを通る曲線をプロットする:
ListLinePlot3D[Table[{Cos[t], Sin[t], Sin[5t]}, {t, 0, 2Pi, 0.1}]]ListLinePlot3D[Table[Sin[j ^ 2 + i], {i, 0, 3, 0.25}, {j, 0, 3, 0.1}]]ListContourPlotを使って連続データから等高線プロットを作成する:
ListContourPlot[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}]]ListDensityPlotを使って連続データから密度プロットを作成する:
ListDensityPlot[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}]]離散データの配列にArrayPlotを使う:
ArrayPlot[CellularAutomaton[30, {{1}, 0}, 50]]行列の構造プロットにMatrixPlotを使う:
MatrixPlot[Import[ "ExampleData/bcsstk08.mtx.gz"]]医療データおよび地理データに対応する行列にReliefPlotを使う:
ReliefPlot[Import["http://exampledata.wolfram.com/hailey.dem.gz", "Data"], ColorFunction -> "GreenBrownTerrain", MaxPlotPoints -> 200]ListLogPlot,ListLogLogPlot,ListLogLinearPlotを対数プロットに使う:
ListLogPlot[Table[Fibonacci[k], {k, 0, 15}], Joined -> True]極プロットにListPolarPlotを使う:
ListPolarPlot[Table[{x, Sqrt[x]}, {x, 0, 2Pi, 0.1}]]DateListPlotを使って時間に沿ってデータを示す:
DateListPlot[{5, 11, 13, 24, 28, 31, 34, 39, 42, 47, 51, 66}, {2006, 1}, PlotStyle -> PointSize[Medium]]三次元パラメリック曲線と曲面にParametricPlot3Dを使う:
{ParametricPlot3D[{Cos[θ], Sin[θ], Sqrt[θ]}, {θ, 0, 6Pi}], ParametricPlot3D[{r ^ 2 Cos[θ], r ^ 2 Sin[θ], r Sqrt[θ]}, {r, 0, 1}, {θ, 0, 6Pi}]}考えられる問題 (2)
ListPlot3D[Table[Sin[x + y ^ 2], {x, 0, 3, 0.1}, {y, 0, 3, 0.1}]]ListPlot3D[Table[Sin[x + y ^ 2], {y, 0, 3, 0.1}, {x, 0, 3, 0.1}]]data = IdentityMatrix[3]ListPlot3D[data, DataRange -> Automatic, Mesh -> All]DataRange->Allを使って
値の行列としての解釈を強制する:
ListPlot3D[data, DataRange -> All, Mesh -> All]あるいは,データ範囲の明示的なリストを与えて
値の行列としての解釈を強制する:
ListPlot3D[data, DataRange -> {{0, 1}, {0, 1}}, Mesh -> All]おもしろい例題 (2)
ListPlot3D[RandomReal[{}, {50, 3}], InterpolationOrder -> 0, Filling -> Bottom, Mesh -> None, ColorFunction -> "Rainbow"]ExampleDataからの画像を使う:
pic = Reverse[ExampleData[{"TestImage", "Sailboat"}, "Data"] / 255.];ListPlot3D[Table[x + Sin[x y], {x, -5, 5, .1}, {y, -5, 5, .1}], Mesh -> None, VertexColors -> {pic[[5 ;; -5 ;; 5, 5 ;; -5 ;; 5]]}, Lighting -> "Neutral"]テクニカルノート
関連するワークフロー
- 2D散布図の点のスタイルを変更する
履歴
1988 で導入 (1.0) | 2007 で更新 (6.0) ▪ 2010 (8.0) ▪ 2012 (9.0) ▪ 2014 (10.0) ▪ 2016 (11.0) ▪ 2017 (11.1) ▪ 2019 (12.0) ▪ 2020 (12.1) ▪ 2025 (14.2) ▪ 2025 (14.3) ▪ 2026 (15.0)
テキスト
Wolfram Research (1988), ListPlot3D, Wolfram言語関数, https://reference.wolfram.com/language/ref/ListPlot3D.html (2026年に更新).
CMS
Wolfram Language. 1988. "ListPlot3D." Wolfram Language & System Documentation Center. Wolfram Research. Last Modified 2026. https://reference.wolfram.com/language/ref/ListPlot3D.html.
APA
Wolfram Language. (1988). ListPlot3D. Wolfram Language & System Documentation Center. Retrieved from https://reference.wolfram.com/language/ref/ListPlot3D.html
BibTeX
@misc{reference.wolfram_2026_listplot3d, author="Wolfram Research", title="{ListPlot3D}", year="2026", howpublished="\url{https://reference.wolfram.com/language/ref/ListPlot3D.html}", note=[Accessed: 03-November-2026]}
BibLaTeX
@online{reference.wolfram_2026_listplot3d, organization={Wolfram Research}, title={ListPlot3D}, year={2026}, url={https://reference.wolfram.com/language/ref/ListPlot3D.html}, note=[Accessed: 03-November-2026]}