R：子集 returns“0 obs”。

Question

我正在尝试对我的数据集 'eggdat' 进行白天和夜间的子集化。这个：

'data.frame':   54847 obs. of  10 variables:
$ year  : int  2014 2014 2014 2014 2014 2014 2014 2014 2014 2014 ...
$ month : int  7 7 7 7 7 7 7 7 7 7 ...
$ day   : int  31 31 31 31 31 31 31 31 31 31 ...
$ hour  : int  20 20 20 20 20 20 20 20 20 20 ...
$ minute: int  5 5 5 5 5 5 5 5 5 5 ...
$ second: int  0 1 2 3 4 5 6 7 8 9 ...
$ Roll  : num  -159 179 -164 -155 -137 ...
$ Pitch : num  -31.36 -41.05 -23.85 -6.62 -9.13 ...
$ Yaw   : num  -71.8 -113.3 -67.2 -140.2 -78.2 ...
$ temp1 : num  25 33.5 34 34 34 34 34 34 34 34 ...

白天的子集工作正常：

daytime <- eggdat[eggdat$hour >= 7 & eggdat$hour <= 20, ]

'data.frame':   18847 obs. of  10 variables:
 $ year  : int  2014 2014 2014 2014 2014 2014 2014 2014 2014 2014 ...
 $ month : int  7 7 7 7 7 7 7 7 7 7 ...
 $ day   : int  31 31 31 31 31 31 31 31 31 31 ...
 $ hour  : int  20 20 20 20 20 20 20 20 20 20 ...
 $ minute: int  5 5 5 5 5 5 5 5 5 5 ...
 $ second: int  0 1 2 3 4 5 6 7 8 9 ...
 $ Roll  : num  -159 179 -164 -155 -137 ...
 $ Pitch : num  -31.36 -41.05 -23.85 -6.62 -9.13 ...
 $ Yaw   : num  -71.8 -113.3 -67.2 -140.2 -78.2 ...
 $ temp1 : num  25 33.5 34 34 34 34 34 34 34 34 ...

在夜间做完全相同的事情，但是，returns 一个具有 0 个观测值的子集：

nighttime <- eggdat[eggdat$hour <= 7 & eggdat$hour >= 21, ]

'data.frame':   0 obs. of  10 variables:
$ year  : int 
$ month : int 
$ day   : int 
$ hour  : int 
$ minute: int 
$ second: int 
$ Roll  : num 
$ Pitch : num 
$ Yaw   : num 
$ temp1 : num

我真的不知道该怎么做。我尝试使用 subset，但没有成功。我也尝试了 eggdat$hour <- as.factor(eggdat$hour)，但也无法正常工作。

更令人困惑的是，在子集函数（daytime <- eggdat[eggdat$hour >= '7' & eggdat$hour <= '20', ] 和 nighttime <- eggdat[eggdat$hour <= '7' & eggdat$hour >= '21', ]）中添加引号导致白天子集包含“0 obs.”，但夜间子集工作正常，所以恰恰相反！白天：'data.frame': 0 obs. of 10 variables: 夜间：

'data.frame':   28800 obs. of  10 variables:
$ year  : int  2014 2014 2014 2014 2014 2014 2014 2014 2014 2014 ...
$ month : int  7 7 7 7 7 7 7 7 7 7 ...
$ day   : int  31 31 31 31 31 31 31 31 31 31 ...
$ hour  : int  21 21 21 21 21 21 21 21 21 21 ...
$ minute: int  0 0 0 0 0 0 0 0 0 0 ...
$ second: int  0 1 2 3 4 5 6 7 8 9 ...
$ Roll  : num  65.8 65.8 66.1 65.6 65.6 ...
$ Pitch : num  6.35 6.34 6.24 6.4 6.27 ...
$ Yaw   : num  171 172 174 176 176 ...
$ temp1 : num  41.5 41.5 41.5 41.5 41.5 41.5 41.5 41.5 41.5 41.5 ...

我真的不知道该怎么办，我对这一切感到很困惑..

Answer 1

你想要eggdat[eggdat$hour <= 7 | eggdat$hour >= 21, ]

x < 7 & x > 21 转换为 x 小于 7 AND 大于 21

x < 7 | x > 21 转换为 x 小于 7 OR 大于 21

R：子集 returns“0 obs”。

R: Subsetting returns "0 obs."

time

r

subset