r初学者，怎样把for循环print出来的数值转化成向量？

x<-1:10000
for(i in x*10){
y<-mean(rbinom(i,1,0.3))
print(y)
}

想要形成x和y的折线图，麻烦各位帮忙指教

你这个循环出来的y只是一个数，x是一堆数，只能画条直线；这个不用for循环，x是1:10000，那再加一列命名为y把对应的y全部算出来拿这个矩阵就能画折线图了