创建一个包含100个位置的向量

Question

我有这个代码，我想计算一个向量x for 1 to 100，但是，它向我展示了一个99个零的向量，最后一个x[100]一个值。它如何返回所有向量元素？

sum1<-function(r,n){return(sum(r^(1:n)))}
sum2<-function(r,n){return((r^(n+1)-1)/(r-1)-1)} 

    print("the the result for 10 20 30 40 ")


for (i in seq(10,40,10)){
 a<-sum1(1.08,i)
 b<-sum2(1.08,i)

print( a )
print( b )

c<-a-b print(  c) }
x<-vector("numeric",length(1:100))
for(i in 100){x[i]<-sum1(1.08,i)   }  

print(x)