创建临时数组以将计算保留在r中

我希望将值0.01附加到一个临时数组，直到年龄达到30岁，以便在公式计算中使用名为Data的数据帧中的每个概率

。例如，对于数据帧Age=21中的第一行，我想创建一个临时数组，根据每个条目的年龄和概率为其创建一个类似的数组

x = c(.21,0.01,0.01,0.01,0.01,0.01,0.01,0.01,0.01,0.01)
Data2 = data.frame(x)

然后我在下面的公式中使用它：

for (i in 1:length(Data$Prob))
{
    for (j in 1:length(Data2$x)) {
         Data$NPV[i] = sum(x[j]*CostofFailure[i]*0.025)/(1+0.07)^j)
}
}


  **Dataframe: Data**
  Age  Prob    Cost      NPV 
  21     45       4000     
  24     21       2000

如果您需要通过将特定值n次附加到另一个选定值（例如.21）来创建向量，请尝试使用rep函数

x = c(.21,rep(0.01,30-21))

会产生结果,

[1] 0.21 0.01 0.01 0.01 0.01 0.01 0.01 0.01 0.01 0.01