如何将数据帧拆分为奇数和偶数年？

Question

我有这种格式的数据框:

    19620101    1   2   4
    19630102    6   2   3
    19640103    0   2   3
    19650104    0   1   3

我想根据年份是偶数还是奇数将它拆分并存储到两个变量/数据帧中.

所以基本上,一个数据帧/变量甚至会有几年

    19620101    1   2   4
    19640103    0   2   3

而另一个将有奇数年:

    19630102    6   2   3
    19650104    0   1   3

我怎样才能做到这一点？

Answer 1

> split(df, floor(df[[1]] / 1e4) %% 2 == 0)
$`FALSE`
        V1 V2 V3 V4
2 19630102  6  2  3
4 19650104  0  1  3

$`TRUE`
        V1 V2 V3 V4
1 19620101  1  2  4
3 19640103  0  2  3