R：固定为功能定义的循环

Question

使用r，我想通过定义的函数运行以下变量：

bn<- .1

bcalc<- for i in 1:10{
  bn[i]<- (bn**i)
  return(bn[i])
}

如何解决此问题以返回bn[i]的所有值？