同心圆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)