ListPolarPlot[{r1,r2,…}]
绘制半径 ri 处等角度间隔排列的点.
ListPolarPlot[{{θ1,r1},{θ2,r2},…}]
用极坐标 θi、ri 绘制点.
ListPolarPlot[{list1,list2,…}]
绘制多个列表.
ListPolarPlot
ListPolarPlot[{r1,r2,…}]
绘制半径 ri 处等角度间隔排列的点.
ListPolarPlot[{{θ1,r1},{θ2,r2},…}]
用极坐标 θi、ri 绘制点.
ListPolarPlot[{list1,list2,…}]
绘制多个列表.
更多信息和选项
- 默认情况下,ListPolarPlot[list] 将 list 中的每个元素绘制为单独的点.
- ListPolarPlot[list,Joined->True] 绘制线,连接列表中的点.
- 角
以弧度为单位,从正
轴逆时针旋转. - 对应于
、
的
、
位置为
、
.
值不一定要位于 0 到
之间. - 在 ListPolarPlot[{r1,…,rn}] 中,r1 被视为对应于
,rn 对应于
. - ListPolarPlot[Tabular[…]cspec] 使用列规范 cspec 从表格对象中提取并绘制数值.
- 在绘制表格数据时,允许使用以下形式的列规范 cspec:
-
{colθ,colr} 绘制列 r 与列 θ 的关系图 {{colθ1,colr1},{colθ2,colr2},…} 绘制列 r1 与列 θ1、列 r2与列 θ2、… 的对比图 colr, {colr} 将 r 列绘制成一个数值序列 {{colr1},…,{colri},…} 绘制列 y1、y2、… 的数值序列 - 可将以下封装 w 用于 listi:
-
Annotation[listi,label] 为数据提供注释 Button[listi,action] 定义点击数据时执行的行为 Callout[listi,label] 用 callout 标注数据 Callout[listi,label,pos] 在相对位置 pos 处放置标注 EventHandler[listi,…] 定义数据的通用事件处理程序 Hyperlink[listi,uri] 把数据变成超链接 Labeled[listi,label] 标注数据 Labeled[listi,label,pos] 把标签放在相对位置 pos 处 Legended[listi,label] 在图例中标识数据 PopupWindow[listi,cont] 为数据添加弹出窗 StatusArea[listi,label] 鼠标悬停时在状态栏中显示 Style[listi,styles] 用指定样式显示数据 Tooltip[listi,label] 为数据添加提示条 Tooltip[listi] 将数据值用作提示条 - 可在多个层级上应用封装 w:
-
{…,w[ri],…} 封装数据中的 ri {…,w[{θ1,r1}],…} 封装点 {θ1,r1} w[listi] 封装数据 w[{list1,…}] 封装一组 listi w1[w2[…]] 使用嵌套封装 - 在 Callout、Labeled 和 Placed 中可使用以下位置 pos:
-
Automatic 自动放置标签 Above, Below, Before, After 数据周围的位置 {x,y} 位置 {x,y} Scaled[s] 沿着数据的缩放位置 s {s,Above},{s,Below},… 沿着数据的在位置 s 处的相对位置 {pos,epos} 放置在数据的相对位置 pos 上的标签内的位置 epos - ListPolarPlot 与 ListPlot 具有相同的选项,并有以下变化: [所有选项的列表]
-
AspectRatio Automatic 高宽比 AxesOrigin {0,0} 坐标轴相交的位置 LabelingFunction Automatic 如何标注点 LabelingSize Automatic callout 和标签的最大尺寸 LabelingTarget Automatic 确定怎样自动安排标签的位置 MeshFunctions {#3&} 如何决定网格点的放置 PlotInteractivity $PlotInteractivity 是否允许出现互动元素 PlotLabels None 数据的标签 PlotLegends None 数据的图例 PolarAxes False 是否绘制极轴 PolarAxesOrigin Automatic 在哪里绘制极轴 PolarGridLines None 极坐标网格线 PolarTicks Automatic 极轴刻度 ScalingFunctions None 怎样缩放个别坐标 - ColorData["DefaultPlotColors"] 给出 PlotStyle 使用的默认颜色序列.
- ScalingFunctions 的可能设置包括:
-
sr 缩放 r 轴 {sx,sy} 缩放 r 轴 {sx,sy,sθ,sr} 缩放 x、y、θ 和 r - 常见的内置缩放函数 s 包括:
-
"Log" 
对数刻度,自动进行标记 "Log10" 
以 10 为底的对数刻度,用 10 的幂进行标记 "SignedLog" 
类似对数的刻度,包含 0 和负数 "Reverse" 
反转坐标的方向 "Infinite" 
无穷刻度 - 通常情况下,不能同时缩放 x 或 y 与 r.
所有选项的列表
范例
打开所有单元 关闭所有单元基本范例 (3)
ListPolarPlot[Table[Sqrt[n], {n, 100}]]ListPolarPlot[Table[Sqrt[n], {n, 100}], Joined -> True]ListPolarPlot[Table[{n, Log[n]}, {n, 500}]]ListPolarPlot[{Range[100] / 4, Sqrt[Range[100]], Log[Range[100]]}, DataRange -> {0, 2Pi}, PlotLegends -> {"one", "two", "three"}]范围 (29)
数据 (9)
ListPolarPlot[Sqrt[Range[20]], Joined -> True]用 DataRange,提供一个精确的 θ 数据范围:
ListPolarPlot[Sqrt[Range[20]], DataRange -> {0, 4Pi}, Joined -> True]ListPolarPlot[{Sqrt[Range[40]], Log[Range[40, 80]]}, Joined -> True]对于包含 θ、r 的不规则数据,θ 数据的范围是由数据获取:
data = Table[{i, i + 1}, {i, 100}];ListPolarPlot[data, Joined -> True, Ticks -> None]data1 = Table[{i, i}, {i, 30}];
data2 = Table[{i + 1 / 3, i}, {i, 30}];
data3 = Table[{i + 2 / 3, i}, {i, 30}];ListPolarPlot[{data1, data2, data3}, Joined -> True]ListPolarPlot[{1, 2, 3, 1 + I, 4, 5, 6, None, 7, 8, 9, Missing["NotAvailable"], 10, 11, 12}, Joined -> True, Mesh -> All]ListPolarPlot[Sqrt[Sin[Range[0, 3Pi, 0.1]]], Joined -> True]用 MaxPlotPoints 限制使用的点的数量:
Table[ListPolarPlot[Table[Sin[4i], {i, 0, 2Pi, 2Pi / 100}], MaxPlotPoints -> mp, Joined -> True], {mp, {Infinity, 50, 30}}]自动选择 PlotRange:
ListPolarPlot[Table[{θ, θ ^ (-1 / 2)}, {θ, 0.1, 25, 0.05}], Joined -> True]用 PlotRange 强调感兴趣的区域:
{ListPolarPlot[Table[{θ, θ ^ (-1 / 2) + RandomReal[0.01]}, {θ, 1, 50, 0.02}], Joined -> True], ListPolarPlot[Table[{θ, θ ^ (-1 / 2) + RandomReal[0.01]}, {θ, 1, 50, 0.02}], Joined -> True, PlotRange -> 0.2]}绘制 TimeSeries:
r = Table[Mod[i, 3], {i, 0, 9, 1 / 2}];
angles = Range[0, π, π / (Length[r] - 1)];
ts = TimeSeries[r, {angles}]ListPolarPlot[ts, Joined -> True]表格数据 (1)
tabular = Tabular[IconizedObject[«spirals»], {"θ", "r", "s", "p"}]ListPolarPlot[tabular -> {"θ", "r"}, Joined -> True]ListPolarPlot[tabular -> "θ", Joined -> True]ListPolarPlot[tabular -> {{"θ", "r"}, {"θ", "s"}}, Joined -> True]添加标签与图例 (10)
ListPolarPlot[Sqrt[Range[13]] -> CharacterRange["a", "m"]]使用 Callout 为一套点添加标签:
ListPolarPlot[Callout[Cos[ Range[0, 4Pi, 0.1]], "label"]]ListPolarPlot[Callout[Cos[Range[0, 4Pi, 0.1]], "label", {0.5, 0.5}]]ListPolarPlot[Callout[Sin[Range[0, 4Pi, 0.1]], "label", Scaled[0.15]]]Table[ListPolarPlot[Callout[Sin[Range[0, 4Pi, 0.1]], "label", pos], PlotLabel -> pos], {pos, {Top, Bottom}}]Table[ListPolarPlot[Callout[Sin[Range[0, 4Pi, 0.1]], "label", pos], PlotLabel -> pos], {pos, {Above, Below}}]用 PlotLabels 标签数据:
ListPolarPlot[Sin[Range[0, 4Pi, 0.1]], PlotLabels -> "label"]ListPolarPlot[{Cos[Range[0, 2Pi, 0.1]], Sin[Range[0, 2Pi, 0.1]]}, PlotLabels -> {"cosine", "sine"}]ListPolarPlot[Callout[Sqrt[Range[100]], "label", Scaled[0.85]]]ListPolarPlot[Callout[Sqrt[Range[100]], "label", {Scaled[0.85], Below}]]ListPolarPlot[Callout[Sqrt[Range[100]], "label", {5, -4}]]ListPolarPlot[Range[100], Joined -> True, DataRange -> {1, 10}, ScalingFunctions -> {"Reverse", None}]ListPolarPlot[Range[100], Joined -> True, DataRange -> {1, 10}, ScalingFunctions -> {None, None, None, "Log"}]演示 (9)
用 Joined 来连接数据集:
ListPolarPlot[Range[10], Joined -> True, PlotStyle -> Orange]data = Table[Table[{x, f}, {x, 0, 2Pi, 0.05}], {f, {Sin[2x], Sin[4x]}}];ListPolarPlot[data, Joined -> True]data = Table[Table[{x, f}, {x, 0, 2Pi, 0.05}], {f, {Sin[2x], Sin[4x]}}];ListPolarPlot[data, PlotStyle -> {Dashed, Red}, Joined -> True]ListPolarPlot[Table[{θ, GoldenRatio ^ θ}, {θ, 0, 4Pi, 0.25}], Joined -> True, AxesLabel -> {r, r}, PlotLabel -> GoldenRatio ^ θ, PlotStyle -> Directive[PointSize[Medium], Purple], Mesh -> All]为数据提供一个交互 Tooltip:
ListPolarPlot[Tooltip[Table[x, {x, 1, 25}]], PlotStyle -> Directive[PointSize[Medium], Orange]]data = Table[Tooltip[Table[{θ, f}, {θ, 0, 2Pi, 0.05}], TraditionalForm[f]], {f, {Sin[2θ], Sin[4θ]}}];ListPolarPlot[data, Joined -> True]ListPolarPlot[Table[p ^ n, {p, 1.1, 1.4, 0.1}, {n, 0, 5, 0.2}], PlotMarkers -> Automatic]ListPolarPlot[Table[Sin[p] ^ n, {p, 1.1, 1.4, 0.1}, {n, 0, 5, 0.2}], PlotMarkers -> Automatic, PlotLegends -> Range[1.1, 1.4, 0.1]]使用 Legended 添加额外的图例:
{data1, data2, data3, data4} = Table[Sin[p] ^ n, {p, 1.1, 1.4, 0.1}, {n, 0, 5, 0.2}];ListPolarPlot[{data1, data2, data3, Legended[data4, HoldForm[Sin[1.4] ^ n]]}, Joined -> True, PlotLegends -> Range[1.1, 1.4, 0.1]]用 InterpolationOrder 平滑连接的数据点:
Table[ListPolarPlot[Range[10], Joined -> True, InterpolationOrder -> io, PlotStyle -> Dashed], {io, {0, 1, 2, 3}}]ListPolarPlot[Table[{n, Log[n]}, {n, 500}], PlotTheme -> "Marketing"]选项 (102)
ColorFunction (5)
ColorFunction 只应用于 Joined 数据集:
{ListPolarPlot[Sin[Range[0, 4Pi, 0.1]], ColorFunction -> "Rainbow"], ListPolarPlot[Sin[Range[0, 4Pi, 0.1]], ColorFunction -> "Rainbow", Joined -> True]}Table[ListPolarPlot[Abs[Sin[Range[0, 4Pi, 0.1]]], Joined -> True, ColorFunction -> Function[{x, y, θ, r}, Evaluate[f]], PlotLabel -> f, PlotStyle -> Thick], {f, {Hue[x], Hue[y], Hue[θ], Hue[r]}}]ListPolarPlot[Sin[Range[0, 4Pi, 0.1]], Joined -> True, ColorFunction -> "DarkRainbow"]对于为曲线着色,ColorFunction 比 PlotStyle 具有更高的优先级:
ListPolarPlot[Sin[Range[0, 4Pi, 0.1]], Joined -> True, ColorFunction -> "DarkRainbow", PlotStyle -> Directive[Red, Thick]]在 MeshShading 中,设置 Automatic 来使用 ColorFunction:
ListPolarPlot[Sin[Range[0, 4Pi, 0.1]], Joined -> True, ColorFunction -> Function[{x, y, θ, r}, Hue[θ]], PlotStyle -> Directive[Red, Thick], Mesh -> 15, MeshShading -> {Automatic, StandardGray}, MeshStyle -> None]ColorFunctionScaling (3)
ColorFunctionScaling 只应用于 Joined 数据集:
{ListPolarPlot[Range[10], ColorFunction -> "Rainbow", ColorFunctionScaling -> True], ListPolarPlot[Range[10], Joined -> True, ColorFunction -> "Rainbow", ColorFunctionScaling -> True]}ListPolarPlot[Sin[Range[0, 4Pi, 0.1]], Joined -> True, ColorFunction -> Function[{x, y, θ, r}, ColorData["RedBlueTones"][r]], PlotStyle -> Thick, ColorFunctionScaling -> True]ListPolarPlot[Sin[Range[0, 4Pi, 0.1]], Joined -> True, ColorFunction -> Function[{x, y, θ, r}, ColorData["RedBlueTones"][Abs[r]]], PlotStyle -> Thick, ColorFunctionScaling -> False]DataRange (4)
ListPolarPlot[Table[1, {i, 25}]]ListPolarPlot[Range[100], DataRange -> {0, 4Pi}]ListPolarPlot[{Sin[Range[0, 8Pi, 0.1]], Sin[Range[0, 4Pi, 0.1]]}, DataRange -> {0, 2Pi}, Joined -> True]ListPolarPlot[Table[{3t, 1}, {t, 0, 2Pi, 2Pi / 10}], Joined -> True]指定此例中 DataRange 无效,由于 θ 值是数据的一部分:
ListPolarPlot[Table[{3t, 1}, {t, 0, 2Pi, 2Pi / 10}], Joined -> True, DataRange -> {0, 1}]ImageSize (7)
使用有名称的尺寸,如 Tiny、Small、Medium 和 Large:
{ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, Pi / 50}], ImageSize -> Tiny], ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, Pi / 50}], ImageSize -> Small]}{ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, Pi / 50}], ImageSize -> 150], ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, Pi / 50}], AspectRatio -> 1.5, ImageSize -> 150]}{ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, Pi / 50}], ImageSize -> {Automatic, 150}], ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, Pi / 50}], AspectRatio -> 2, ImageSize -> {Automatic, 150}]}{ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, Pi / 50}], ImageSize -> UpTo[200]], ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, Pi / 50}], AspectRatio -> 2, ImageSize -> UpTo[200]]}ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, Pi / 50}], ImageSize -> {200, 300}, Background -> StandardYellow]设置 AspectRatioFull 会填充可用空间:
ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, Pi / 50}], AspectRatio -> Full, ImageSize -> {200, 300}, Background -> StandardYellow]{ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, Pi / 50}], ImageSize -> {UpTo[150], UpTo[100]}], ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, Pi / 50}], AspectRatio -> 2, ImageSize -> {UpTo[150], UpTo[100]}]}Framed[Pane[ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, Pi / 50}], ImageSize -> Full, Background -> StandardYellow], {200, 200}]]Framed[Pane[ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, Pi / 50}], AspectRatio -> Full, ImageSize -> {Scaled[0.5], Scaled[0.5]}, Background -> StandardYellow], {200, 200}]]InterpolationOrder (5)
可以用插值处理 Joined 线条:
ListPolarPlot[Range[10], Joined -> True, InterpolationOrder -> 2]ListPolarPlot[Range[10], Joined -> True, InterpolationOrder -> None, Mesh -> Full]ListPolarPlot[Range[10], Joined -> True, InterpolationOrder -> 0, Mesh -> Full]ListPolarPlot[{{1, 4, 2, 3, 10, 8, 2}}, Joined -> True, InterpolationOrder -> 3, Mesh -> Full]Table[ListPolarPlot[{{1, 4, 2, 3, 10, 8, 2}}, Joined -> True, InterpolationOrder -> i, Mesh -> Full, PlotLabel -> i], {i, 0, 5}]Joined (3)
ListPolarPlot[Sqrt[Range[20]], Joined -> True]ListPolarPlot[{Sqrt[Range[20]], Range[0, 10, 0.1]}, Joined -> {True, False}]ListPolarPlot[Range[20], Joined -> True, Mesh -> All]LabelingFunction (7)
ListPolarPlot[Table[x, {x, 1, 10}] -> {"a", "b", "c", "d", "e", "f", "g", "h", "i", "j"}]使用 LabelingFunction->None 压缩标签:
ListPolarPlot[Table[x, {x, 1, 10}] -> {"a", "b", "c", "d", "e", "f", "g", "h", "i", "j"}, LabelingFunction -> None]ListPolarPlot[Table[x, {x, 1, 10}] -> {"a", "b", "c", "d", "e", "f", "g", "h", "i", "j"}, LabelingFunction -> Above]ListPolarPlot[Table[x, {x, 1, 10}] -> {"a", "b", "c", "d", "e", "f", "g", "h", "i", "j"}, LabelingFunction -> Tooltip]使用 Callout 标签点:
ListPolarPlot[Table[x, {x, 1, 10}] -> {"a", "b", "c", "d", "e", "f", "g", "h", "i", "j"}, LabelingFunction -> Callout[Automatic, Appearance -> "Line"]]ListPolarPlot[Table[x, {x, 1, 10}] -> {"a", "b", "c", "d", "e", "f", "g", "h", "i", "j"}, LabelingFunction -> (Round[#1, 0.1]&)]ListPolarPlot[Table[x, {x, 1, 10}] -> {"a", "b", "c", "d", "e", "f", "g", "h", "i", "j"}, LabelingFunction -> (#2[[2]]&)]用 PlotLabels 指定整个标签,把单个标签放在 Tooltip:
ListPolarPlot[Table[x, {x, 1, 10}] -> {"a", "b", "c", "d", "e", "f", "g", "h", "i", "j"}, PlotLabels -> {"label"}, Joined -> True, PlotMarkers -> Automatic, LabelingFunction -> (Placed[#3, Tooltip]&)]LabelingSize (2)
ListPolarPlot[Callout[Cos[Sin[2Pi Subdivide[100]]], "ListPolarPlot", {0.5, -0.5}]]ListPolarPlot[Callout[Cos[Sin[Range[0, 2Pi, 0.1]]], "ListPolarPlot", {0.5, -0.5}], LabelingSize -> 30]ListPolarPlot[Callout[Cos[Sin[Range[0, 2Pi, 0.1]]], [image], {0.5, -0.5}]]ListPolarPlot[Callout[Cos[Sin[Range[0, 2Pi, 0.1]]], [image], {0.5, -0.5}], LabelingSize -> 60]LabelingTarget (6)
ListPolarPlot[IconizedObject[«data»]]ListPolarPlot[IconizedObject[«data»], LabelingTarget -> All]ListPolarPlot[IconizedObject[«data»], LabelingTarget -> "Dense"]ListPolarPlot[IconizedObject[«data»], LabelingTarget -> 0.5]ListPolarPlot[IconizedObject[«data»], LabelingTarget -> <|"AllowedLabelingPositions" -> "Sides"|>]ListPolarPlot[IconizedObject[«data»], LabelingTarget -> <|"AllowedLabelingPositions" -> "Corners"|>]ListPolarPlot[IconizedObject[«data»], LabelingTarget -> <|"AllowedLabelingPositions" -> {"Top", "Right"}, "AllowedOverlaps" -> {"Lines"}|>]ListPolarPlot[IconizedObject[«data»], LabelingTarget -> <|"AllowLabelClipping" -> True|>]MaxPlotPoints (2)
ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, Pi / 100}], Joined -> True]Table[ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, Pi / 100}], MaxPlotPoints -> mp, Joined -> True], {mp, {Infinity, 50, 30}}]ListPolarPlot[Sin[Range[10^6]2.Pi / 10^5] + RandomReal[0.3, 10^6], MaxPlotPoints -> 10^3, Joined -> True]Mesh (6)
{ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> 31], ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> 31, Joined -> True]}{ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> Full, Joined -> True], ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> All, Joined -> True]}{ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> Full, InterpolationOrder -> 3, Joined -> True], ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> All, InterpolationOrder -> 3, Joined -> True]}ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> 20, Joined -> True]ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> {Range[0, 2Pi, Pi / 8]}, MeshStyle -> PointSize[Medium], Joined -> True]ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> {Table[{x, Directive[Hue[x / (2Pi)], PointSize[Medium]]}, {x, 0, 2Pi, Pi / 8}]}, Joined -> True]MeshFunctions (3)
MeshFunctions 只应用于 Joined 数据集:
{ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> 10, MeshFunctions -> {#1&}], ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> 10, MeshFunctions -> {#1&}, Joined -> True]}Table[ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], MeshFunctions -> {Function[{x, y, θ, r}, Evaluate[f]]}, Mesh -> 16, PlotLabel -> f, Joined -> True], {f, {x, y, θ, r}}]ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> {5, 10}, MeshFunctions -> {#1&, #2&}, MeshStyle -> {Directive[PointSize[Medium], Red], Blue}, Joined -> True]MeshShading (7)
MeshShading 只应用于 Joined 数据集:
{ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> 10, MeshShading -> {Red, Blue}], ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> 10, MeshShading -> {Red, Blue}, Joined -> True]}ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> 10, MeshShading -> {Red, Blue}, Joined -> True]用 None 移除曲线段:
ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> 10, MeshShading -> {Red, None}, Joined -> True]MeshShading 可以同 PlotStyle一起使用:
ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> 10, PlotStyle -> Thick, MeshShading -> {Red, Blue}, Joined -> True]对曲线样式,MeshShading 比 PlotStyle 具有更高的优先级:
ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> 10, PlotStyle -> Green, MeshShading -> {Red, Blue}, Joined -> True]通过设置 MeshShading 为 Automatic,为一些曲线段用 PlotStyle:
ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> 10, PlotStyle -> Directive[Thick, Yellow], MeshShading -> {Red, Automatic}, Joined -> True]MeshShading 可以与 ColorFunction 连用,并且具有更高的优先级别:
ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> 30, PlotStyle -> Thick, MeshShading -> {StandardGray, Automatic},
ColorFunction -> Function[{x, y, θ, r}, Hue[θ]], Joined -> True]MeshStyle (5)
{ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> 10, MeshStyle -> Red], ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> 10, MeshStyle -> Red, Joined -> True]}ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> 10, MeshStyle -> Automatic, Joined -> True]ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> 10, MeshStyle -> Red, Joined -> True]ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> 10, MeshStyle -> {Red, Blue}, MeshFunctions -> {#1&, #2&}, Joined -> True]ListPolarPlot[Table[Sin[t], {t, 0, 4Pi, 0.2}], Mesh -> 15, MeshStyle -> Directive[PointSize[Large], Red], Joined -> True]PlotLabels (5)
ListPolarPlot[{Sin[Range[0, 2Pi, 0.1]], Cos[Range[0, 2Pi, 0.1]]}, PlotLabels -> Callout[{"sin", "cos"}, After]]ListPolarPlot[{Sin[Range[0, 2Pi, 0.1]], Cos[Range[0, 2Pi, 0.1]]}, PlotLabels -> Callout[{"label1", "label2"}, Above]]ListPolarPlot[{Sin[Range[0, 2Pi, 0.1]], Cos[Range[0, 2Pi, 0.1]]}, PlotLabels -> {Callout["label1", Above], Callout["label2", After]}]ListPolarPlot[{Sin[Range[0, 2Pi, 0.1]], Cos[Range[0, 2Pi, 0.1]]}, PlotLabels -> {Callout["label1", {Scaled[0.7], Above}], Callout["label2", {Scaled[0.4], Below}]}]ListPolarPlot[{Sin[Range[0, 2Pi, 0.1]], Cos[Range[0, 2Pi, 0.1]]}, PlotLabels -> {Callout["label1", Before], Callout["label2", After]}]使用 None 不添加标签:
ListPolarPlot[{Sin[Range[0, 2Pi, 0.1]], Cos[Range[0, 2Pi, 0.1]]}, PlotLabels -> {"label1", None}]PlotLegends (7)
ListPolarPlot[Sin[Range[0, 4Pi, 0.1]]]ListPolarPlot[{Sin[Range[0, 4Pi, 0.1]], Cos[Range[0, 4Pi, 0.1]]}, PlotStyle -> {Red, Blue}, PlotLegends -> {"sine", "cose"}]ListPolarPlot[{Sin[Range[0, 8Pi, 0.1]], Sin[Range[0, 4Pi, 0.1]]}, PlotLegends -> Automatic]ListPolarPlot[{Sin[Range[0, 8Pi, 0.1]], Sin[Range[0, 4Pi, 0.1]]}, PlotStyle -> {Directive[AbsolutePointSize[5], Red], Blue}, PlotLegends -> Automatic]使用 Placed 指定图例位置:
Table[ListPolarPlot[{Sin[Range[0, 8Pi, 0.1]], Sin[Range[0, 4Pi, 0.1]]}, PlotLegends -> Placed[Automatic, pl], PlotLabel -> pl], {pl, {After, Before}}]ListPolarPlot[{Range[40], Range[40] ^ 1.2}, PlotLegends -> Placed[PointLegend[Automatic, LegendLayout -> "Row"], {0.75, 0.85}]]Table[ListPolarPlot[{Sin[Range[0, 8Pi, 0.1]], Sin[Range[0, 4Pi, 0.1]]}, PlotLegends -> Placed[Automatic, pl]], {pl, {After, Above}}]使用 PointLegend 改变图例外观:
ListPolarPlot[{Sin[Range[0, 8Pi, 0.1]], Sin[Range[0, 4Pi, 0.1]]}, PlotLegends -> PointLegend[{8, 4}, LegendFunction -> Panel, LegendLayout -> "Row"]]PlotMarkers (8)
ListPolarPlot 通常使用不同的颜色来区分不同的数据集:
ListPolarPlot[Table[p ^ n, {p, 1.1, 1.4, 0.1}, {n, 0, 5, 0.2}], PlotMarkers -> None]ListPolarPlot[Table[p ^ n, {p, 1.1, 1.4, 0.1}, {n, 0, 5, 0.2}], PlotMarkers -> Automatic]ListPolarPlot[Table[p ^ n, {p, 1.1, 1.4, 0.1}, {n, 0, 5, 0.2}], PlotMarkers -> Automatic, PlotStyle -> StandardBlue]Table[ListPolarPlot[Table[p ^ n, {p, 1.1, 1.4, 0.1}, {n, 0, 5, 0.2}], PlotMarkers -> {Automatic, s}], {s, {Small, Medium}}]ListPolarPlot[Table[p ^ n, {p, 1.1, 1.4, 0.1}, {n, 0, 5, 0.2}], PlotMarkers -> {Automatic, Large}]ListPolarPlot[Table[p ^ n, {p, 1.1, 1.4, 0.1}, {n, 0, 5, 0.2}], PlotMarkers -> {"1", "2", "3", "4"}]{m1, m2, m3, m4} = Graphics /@ {Circle[{0, 0}, 1], Disk[{0, 0}, 1], Line[{{-0.5, -0.5}, {0.5, -0.5}, {0.5, 0.5}, {-0.5, 0.5}, {-0.5, -0.5}}], Polygon[{{-0.5, -0.5}, {0.5, -0.5}, {0.5, 0.5}, {-0.5, 0.5}}]}ListPolarPlot[Table[p ^ n, {p, 1.1, 1.4, 0.1}, {n, 0, 5, 0.2}], PlotMarkers -> Table[{s, 0.05}, {s, {m1, m2, m3, m4}}]]ListPolarPlot[Table[p ^ n, {p, 1.1, 1.4, 0.1}, {n, 0, 5, 0.2}], PlotMarkers -> "●"]Table[ListPolarPlot[Table[p ^ n, {p, 1.1, 1.4, 0.1}, {n, 0, 5, 0.2}], PlotMarkers -> {"●", s}], {s, {4, 8, 12}}]PlotRange (2)
自动计算 PlotRange:
ListPolarPlot[{1, 2, 3, 4, 50, 6, 7, 8, 9, 10, 11, 12}, Joined -> True]ListPolarPlot[{1, 2, 3, 4, 50, 6, 7, 8, 9, 10, 11, 12}, Joined -> True, PlotRange -> All]PlotStyle (7)
Table[ListPolarPlot[Table[k / 10, {k, 0, 2Pi, 0.2}], PlotStyle -> ps], {ps, {Red, PointSize[Large], Darker[Green], Directive[Red, PointSize[Large]]}}]Table[ListPolarPlot[Table[k / 10, {k, 0, 2Pi, 0.2}], PlotStyle -> ps, Joined -> True], {ps, {Red, Thick, Darker[Green], Directive[Red, Dashed]}}]ListPolarPlot[Table[k, {k, 1, 3}, {50}]]ListPolarPlot[Table[k, {k, 1, 3}, {50}], PlotStyle -> {Red, Green, Blue}]PlotStyle 应用于线和点:
ListPolarPlot[Table[k, {k, 1, 2}, {50}], Joined -> {True, False}, PlotStyle -> Red]ListPolarPlot[Table[k, {k, 1, 2}, {50}], Joined -> {True, False}, PlotStyle -> {Thick, PointSize[Large]}]PlotStyle 可以与 ColorFunction 连用:
ListPolarPlot[Table[Sin[4x], {x, 0, 2Pi, 0.05}], Joined -> True, PlotStyle -> Thick, ColorFunction -> Function[{x, y, θ, r}, Hue[θ]]]PlotStyle 可以与 MeshShading 连用,并且具有较低的优先级:
ListPolarPlot[Table[Sin[4x], {x, 0, 2Pi, 0.05}], Joined -> True, PlotStyle -> Directive[Opacity[0.5], Thick], Mesh -> 10, MeshFunctions -> {#1&}, MeshShading -> {Red, Blue}]默认情况下,MeshStyle 与 PlotStyle 使用相同的样式:
ListPolarPlot[Table[Sin[4x], {x, 0, 2Pi, 0.05}], PlotStyle -> Red, Mesh -> All, Joined -> True]PlotTheme (1)
ListPolarPlot[Sin[Range[0, 4Pi, 0.1]], Joined -> True, PlotTheme -> "Scientific"]ListPolarPlot[Sin[Range[0, 4Pi, 0.1]], Joined -> True, PlotTheme -> {"Scientific", "Grid"}]ListPolarPlot[Sin[Range[0, 4Pi, 0.1]], Joined -> True, PlotTheme -> {"Scientific", "Grid"}, ColorFunction -> "DarkRainbow"]PolarAxes (1)
ListPolarPlot[Table[{t, 2Sin[2t]}, {t, 0, 2π, π / 100}], PlotRangePadding -> 2, PolarAxes -> True]ListPolarPlot[Table[{t, 2Sin[2t]}, {t, 0, 2π, π / 100}], PlotRangePadding -> 2, PolarAxes -> True, PolarGridLines -> True]ListPolarPlot[Table[{t, 2Sin[2t]}, {t, 0, 2π, π / 100}], PlotRangePadding -> 2, PolarAxes -> {True, False}, PolarGridLines -> True]PolarAxesOrigin (1)
ListPolarPlot[Table[{{θ, 2Sin[2θ]}, {θ, Cos[2θ]}}, {θ, 0, 2π, 0.01}], PlotRangePadding -> 4, PolarAxes -> True, PolarAxesOrigin -> {0, 3}]ListPolarPlot[Table[{{θ, 2Sin[2θ]}, {θ, Cos[2θ]}}, {θ, 0, 2π, 0.01}], PlotRangePadding -> 1.5, PolarAxes -> True, PolarAxesOrigin -> {{Bottom, Right}, Automatic}, PolarTicks -> {None, Automatic}]PolarGridLines (1)
ListPolarPlot[Table[{θ, 3Cos[3θ]}, {θ, 0, 2Pi, 0.1}], PlotRangePadding -> 2.5, PolarAxes -> True, PolarGridLines -> Automatic]ListPolarPlot[Table[{θ, 3Cos[3θ]}, {θ, 0, 2Pi, 0.1}], PlotRangePadding -> 1.5, PolarAxes -> True, PolarGridLines -> {{0, (2π/3), (4π/3)}, Automatic}, PolarTicks -> {{0, (2π/3), (4π/3)}, Automatic}]ListPolarPlot[Table[{θ, 3Cos[3θ]}, {θ, 0, 2Pi, 0.1}], GridLinesStyle -> Orange, PlotRangePadding -> 1.5, PolarAxes -> True, PolarGridLines -> {{0, (2π/3), (4π/3)}, Automatic}, PolarTicks -> {{0, (2π/3), (4π/3)}, Automatic}]PolarTicks (1)
ListPolarPlot[Table[{θ, 1 - 2Sin[4θ]}, {θ, 0, 2Pi, 0.02}], PlotRangePadding -> 2.5, PolarAxes -> True, PolarTicks -> Automatic]更改某些刻度的标签,使角度从
开始,到
结束,而不是
到
:
ListPolarPlot[Table[{θ, 1 - 2Sin[4θ]}, {θ, 0, 2Pi, 0.02}], PlotRangePadding -> 2.5, PolarAxes -> True, PolarTicks -> {{0, (π/4), (π/2), (3 π/4), π, {(5 π/4), -(3π/4)}, {(3 π/2), -(π/2)}, {(7 π/4), -(π/4)}}, Automatic}]ListPolarPlot[Table[{θ, 1 - 2Sin[4θ]}, {θ, 0, 2Pi, 0.02}], PlotRangePadding -> 1.5, PolarAxes -> True, PolarTicks -> {"Degrees", Range[0, 3]}]ScalingFunctions (3)
默认情况下,ListPolarPlot 对两个坐标轴都使用线性刻度:
ListPolarPlot[IconizedObject[«spiral»], Joined -> True]用 ScalingFunctions 反转 y 轴的坐标方向:
ListPolarPlot[IconizedObject[«spiral»], Joined -> True, ScalingFunctions -> {None, "Reverse", None, None}]ListPolarPlot[IconizedObject[«spiral»], Joined -> True, ScalingFunctions -> {None, None, None, "Log"}]属性和关系 (13)
ListPolarPlot 是 ListPlot 的一个特例:
{ListPolarPlot[Table[k, {k, 0, 9}], Joined -> True],
ListPlot[Table[{k Cos[2Pi k / 10], k Sin[2Pi k / 10]}, {k, 0, 9}], Joined -> True, AspectRatio -> Automatic]}对函数使用 PolarPlot:
{PolarPlot[Sin[4x], {x, 0, 2Pi}], ListPolarPlot[Table[{x, Sin[4x]}, {x, 0, 2Pi, 0.05}], Joined -> True]}为笛卡儿图使用 ListPlot 和 ListLinePlot:
ListPlot[Table[{x, Sqrt[x]}, {x, 0, 2Pi, 0.1}]]对对数坐标图使用 ListLogPlot,ListLogLogPlot 和 ListLogLinearPlot:
ListLogPlot[Table[Binomial[25, k], {k, 0, 25}], Joined -> True]用 DateListPlot 显示过去的数据:
DateListPlot[{5, 11, 13, 24, 28, 31, 34, 39, 42, 47, 51, 66}, {2006, 1}, PlotStyle -> PointSize[Medium]]用 ListPointPlot3D 显示三维空间的点:
ListPointPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 0.1}]]用 ListPlot3D 从数据创建面:
ListPlot3D[Table[Sin[j ^ 2 + i], {i, 0, Pi, 0.1}, {j, 0, Pi, 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 和 MatrixPlot:
ArrayPlot[Table[GCD[i, j], {i, 1, 20}, {j, 1, 20}]]对圆柱和球形坐标使用 RevolutionPlot3D 和 SphericalPlot3D:
RevolutionPlot3D[-(ϕ + Sin[r]), {r, 0, 4Pi}, {ϕ, 0, 2Pi}]SphericalPlot3D[1 + 1 / 5Sin[3v], {u, 0, Pi}, {v, 0, 2Pi}]对参数曲线使用 ParametricPlot:
{ParametricPlot[{Cos[θ], Sin[θ]}, {θ, 0, 2Pi}], ListLinePlot[Table[{Cos[θ], Sin[θ]}, {θ, 0, 2Pi, 0.1}], AspectRatio -> 1]}RadialAxisPlot 在圆上显示
-维点的坐标:
{ListPolarPlot[Range[7], Joined -> True], RadialAxisPlot[Range[7]]}巧妙范例 (1)
相关指南
-
▪
- 数据可视化 ▪
- GPU 计算 ▪
- 角度和极坐标 ▪
- NVIDIA GPU 计算 ▪
- Apple GPU 计算
文本
Wolfram Research (2007),ListPolarPlot,Wolfram 语言函数,https://reference.wolfram.com/language/ref/ListPolarPlot.html (更新于 2025 年).
CMS
Wolfram 语言. 2007. "ListPolarPlot." Wolfram 语言与系统参考资料中心. Wolfram Research. 最新版本 2025. https://reference.wolfram.com/language/ref/ListPolarPlot.html.
APA
Wolfram 语言. (2007). ListPolarPlot. Wolfram 语言与系统参考资料中心. 追溯自 https://reference.wolfram.com/language/ref/ListPolarPlot.html 年
BibTeX
@misc{reference.wolfram_2026_listpolarplot, author="Wolfram Research", title="{ListPolarPlot}", year="2025", howpublished="\url{https://reference.wolfram.com/language/ref/ListPolarPlot.html}", note=[Accessed: 31-October-2026]}
BibLaTeX
@online{reference.wolfram_2026_listpolarplot, organization={Wolfram Research}, title={ListPolarPlot}, year={2025}, url={https://reference.wolfram.com/language/ref/ListPolarPlot.html}, note=[Accessed: 31-October-2026]}