使用as.character(as.Date())转换原始因子变量Date列后,按特定日期对数据框进行子集设置

时间:2019-04-29 05:58:35

标签: r dataframe subset as.date

我是R的新手,正在尝试一些练习问题。我有一个大数据集,需要从日期范围创建一个较小的数据集。我这样做很困难,可能是因为我对这些R命令的功能不了解。

这是数据集rawdata的前六行:

Date     Time Global_active_power Global_reactive_power Voltage
1 16/12/2006 17:24:00               4.216                 0.418 234.840
2 16/12/2006 17:25:00               5.360                 0.436 233.630
3 16/12/2006 17:26:00               5.374                 0.498 233.290
4 16/12/2006 17:27:00               5.388                 0.502 233.740
5 16/12/2006 17:28:00               3.666                 0.528 235.680
6 16/12/2006 17:29:00               3.520                 0.522 235.020
  Global_intensity Sub_metering_1 Sub_metering_2 Sub_metering_3
1           18.400          0.000          1.000             17
2           23.000          0.000          1.000             16
3           23.000          0.000          2.000             17
4           23.000          0.000          1.000             17
5           15.800          0.000          1.000             17
6           15.000          0.000          2.000             17

我想创建此数据的子集,其日期从2007年2月1日至2007年2月2日。

this thread中,我发现了建议先运行as.Date函数(如果需要,还可以运行as.character函数),然后再运行子函数。

因此,我首先使用as.character(rawdata $ Date)将“日期”列从因子转换为字符。意识到这会生成完整的数据列表,我将其分配给对象CharDate,如下所示:

CharDate <- as.character(rawdata$Date)

然后,我再次使用as.Date转换了数据,打算将其用作我的原始数据的子集,并将其分配给DateasDate。

DateasDate <- as.Date(CharDate, "%d/%m/%y")

在这一点上,我对如何使用它来对我的原始文件rawdata进行子集感到困惑,因为DateasDate不是新变量吗?我是否需要将DateasDate作为列添加到rawdata?有什么方法可以直接更改rawdata中的“日期”列,而不必这样做?

任何帮助将不胜感激!

1 个答案:

答案 0 :(得分:0)

您可以先将Date对象转换为实际日期,然后再将subset转换为数据框。

df$Date <- as.Date(df$Date, "%d/%m/%Y")
subset(df, Date >= as.Date("2007-01-02") & Date <= as.Date("2007-02-02"))

或对dplyr使用相同的逻辑

library(dplyr)

df %>%
  mutate(Date = as.Date(Date, "%d/%m/%Y") %>%
  filter(Date >= as.Date("2007-01-02") & Date <= as.Date("2007-02-02"))