如何使用R删除数据框中的前N行和后N行？

Question

我有一个2M +行的数据帧df，如下所示：

        LOCUS POS COUNT
1: CP007539.1   1     4
2: CP007539.1   2     7
3: CP007539.1   3    10
4: CP007539.1   4    15
5: CP007539.1   5    21
6: CP007539.1   6    28

目前我正在使用它来删除第一行和最后一行：

> df_adj = df[head(df$POS,-1000),]
> df_adj = tail[(df_adj$POS,-1000),]

但即使我可以看到，这可以通过更好的方式完成。建议？

Answer 1

您可以执行此操作，指定要在最终数据集中保留的行范围：

 df_adj <- df[1001:( nrow(df) - 1000 ),]

确保您有足够的行来执行此操作。更安全的方法可能是：

df_adj <- if( nrow(df) > 2000 ) df[1001:( nrow(df) - 1000 ),] else df