如何在保持第一行和最后一行的同时选择每隔xth行

Question

假设我们有以下数据：

Measure         Value
2.00              8
2.9993544         1
2.9993925         8
2.9994541        15
2.9994957         4
2.9995287         1
2.9995569        12
2.9996014         1
2.9996418        13
2.9996768         1
2.9997152         3
3                21

我想选择第二行，但保留第一行和最后一行。预期的输出将是：

Measure         Value
2.00              8
2.9993925         8
2.9994957         4
2.9995569        12
2.9996418        13
2.9997152         3
3                21

我尝试了以下几种数据集，但删除了最后一行：

df[seq(1, nrow(df), 2), ]

我该如何解决？

Answer 1

使用向量回收。

d[c(TRUE, FALSE) | (seq(NROW(d)) == NROW(d)),]
#    Measure Value
#1  2.000000     8
#3  2.999392     8
#5  2.999496     4
#7  2.999557    12
#9  2.999642    13
#11 2.999715     3
#12 3.000000    21