同心圆R.

Question

我想创建50个同心圆.我用python做了但现在我想在R中做这个.我尝试了符号功能但没有结果.我希望我的圆圈从x,y坐标开始,每个圆的半径比前一个大3倍.

step=1
for(i in seq(1,50,1)){
  symbols (x, y, circles=50, col="grey")
step=step+3
}

由此我得到一个圆圈.

我是编程新手,所以它可能非常简单.我应该使用特定的包裹吗？

Answer 1

R的美妙之处在于可以对许多事物进行矢量化,包括对"符号"功能的影响.这是给你的一个例子:

#vector of radii
#written in a way that's easily changable
n_circles <- 50
my_circles <- seq(1,by=1,length.out = n_circles)
#generate x and y
x <- rep(1,n_circles)
y <- rep(1, n_circles)

#plot
symbols(x,y,1:n_circles)