基于现有列创建数据库列

Question

我必须使用这个函数来计算一些企业的月收益：

第i+1月的月收益率=（第i+1月收盘价-第i月收盘价）/第i月收盘价

我有一个数据集，其中包含大约 10 年的每个月的收盘价。我将如何创建/使用函数来计算每个月的 MR？

Answer 1

monthly <- c(100, 120, 130, 100, 140)  # replace this of course with actual data

result <- rep(NA, length(monthly))
for (i in 1:(length(monthly)-1)) {
   result[i+1] <- (monthly[i+1] - monthly[i]) / monthly[i] 
}

result 现在将包含您的答案。请注意，第一个位置将包含 NA，因为您对月份 i 为 1 不感兴趣。