如何获得R中数据帧列的每个奇数索引值与偶数索引值的比率？

我对R编程相当陌生。我正在处理一个带有值的数据帧列-

> data$col
[1] 37.80 37.76 37.27 36.67

我想在数据框

data

中添加一个新的列

col\u ratio

，以便

data$col\u ratio

的输出是-

1.00 NA 1.01 NA

这基本上是

（37.80/37.76）

和

（37.27/36.67）

的比率

我试过了-

> data$col_ratio <- data$col[1]/data$col[2]
> data$col_ratio[2] <- NA

我缺少什么来获得输出-

> data$col_ratio
[1] 1.001059       NA 1.001059 1.001059

1.00 NA 1.01 NA

---

谢谢

seq

这里是你的朋友：

# idx gets 1, 3, 5, ...
idx = seq(1L, nrow(data), by=2L)

# initialize the column to be missing and real-valued
data$col_ratio = NA_real_
data$col_ratio[idx] = data$col[idx] / data$col[-idx]

-idx

不包括奇数索引，即它是偶数索引

---

如果

nrow（data）

很奇怪，但基本思想是一样的，那么就必须格外小心。

谢谢，但这给了我一个类似

[1]1.001059 1.016362 1.001059 1.016362

的输出，其中预期的输出是

[1]1.001059 NA 1.001059 NA

。对不起，我有一个打字错误，现在已经修复了