各位老师好，请教一个问题。我是R小白，初学者。在编一段代码时出了问题，恳请指教下。

我这个代码的目的是，假设一个总体包含1000个数的正态总体，然后从里面随机抽样，第一次抽3个作为一组，计算相对标准偏差，第二次抽4个作为一组计算相对标准偏差，依次抽样10个。然后按照相对标准偏差对应样本量做散点图，目的是想看看随着样本量增大，相对标准偏差的变化情况。

代码如下，请指教。

zongti<-rnorm(1000,1,0.1)
x=c(3:10)
for (i in 1:x){
rsd<-c(sd(sample(zongti,i,replace = FALSE))/mean(sample(zongti,i,replace = FALSE)))
)
plot(x,rsd)