R:在极坐标中绘制半径 = 1 和角度 0-2pi 的圆？

Question

我在 R 中找到了 plotrix 包，但还找不到如何在 R 中做这个简单的圆。基本上，我怎样才能做一个半径为 1 和角度为 0:360 的极坐标图，生成一个圆？

示例

$$r\cos\left(\frac{2\pi}{3}\left(\frac{3\theta}{2\pi}-\left\lfloor\frac{3\theta}{2\pi}\right\rfloor\right) -\frac{\pi}{3}\right) = 1$$

可能相关

1. 尝试绘制上述函数，更多 here , 具有此 hack 的 LaTex here可见。

2. Draw a circle with ggplot2

3. Regular polygons in polar coordinates

Answer 1

你也可以用几何画圆

circle <- function(x, y, rad = 1, nvert = 500, ...){
    rads <- seq(0,2*pi,length.out = nvert)
    xcoords <- cos(rads) * rad + x
    ycoords <- sin(rads) * rad + y
    polygon(xcoords, ycoords, ...)
}

# asp = 1 due to Hans' comment below- wouldn't let me leave a comment just saying 'thanks'
plot(-5:5, type="n", xlim = c(-5,5), ylim = c(-5,5), asp = 1)
circle(0,0,4)
circle(-1.5,1.5,.5)
circle(1.5,1.5,.5)
circle(0,0,1)
segments(-2,-2,2,-2)