如何在R中绘制极坐标?

时间:2015-03-22 10:56:05

标签: r polar-coordinates parametric-equations

假设(x(t),y(t))具有极坐标(√t,2πt)。绘图(x(t),y(t))为t∈[0,10]。

R中没有适当的功能用极坐标绘图。我通过给出了x =√t& Y =2πT。 但结果图并不像预期的那样。

我从“使用r进行科学编程和模拟的介绍”中得到了这个问题,这本书告诉我们情节应该是螺旋式的。

3 个答案:

答案 0 :(得分:7)

制作一个序列:

t <- seq(0,10, len=100)  # the parametric index
# Then convert ( sqrt(t), 2*pi*t ) to rectilinear coordinates
x = sqrt(t)* cos(2*pi*t) 
y = sqrt(t)* sin(2*pi*t)
png("plot1.png");plot(x,y);dev.off()

enter image description here

它不会显示连续字符,因此添加行以连接序列中的相邻点:

png("plot2.png");plot(x,y, type="b");dev.off()

enter image description here

答案 1 :(得分:2)

正如之前评论中已经提到的,R可以使用极坐标进行绘图。封装plotrix有一个名为polar.plot的函数可以做到这一点。极坐标由长度和角度定义。该函数可以采用一系列长度和一系列角度来绘制极坐标。例如,制作一个螺旋:

library(plotrix)
plt.lns <- seq(1, 100, length=500)
angles <- seq(0, 5*360, length=500)%%360
polar.plot(plt.lns, polar.pos=angles, labels="", rp.type = "polygon")

答案 2 :(得分:0)

一个值得一试的选项,它是Plotly包。

library(plotly)

p <- plot_ly(plotly::mic, r = ~r, t = ~t, color = ~nms, alpha = 0.5, type = "scatter")

layout(p, title = "Mic Patterns", orientation = -90)

注意:如果您使用的是RStudio,则图表将显示在“查看器”选项卡中。