使用R的文本处理

Question

我是非常新的编程和R软件。

我的数据集包括日期-时间变量如下：

2007/11/0103
2007/11/0104
2007/11/0105
2007/11/0106

我需要一个操作符，从左数到字符号10，然后执行一个space并复制最后两个字符，然后为所有列添加:00。

预期成果：

2007/11/01 03:00
2007/11/01 04:00
2007/11/01 05:00
2007/11/01 06:00

Answer 1

假设您的日期是名为dates的向量

library(stringr)
paste0(paste(str_sub(dates, end=10), str_sub(dates, 11)), ":00")

Answer 2

如果您想将数据实际转换为R中的"POSIXlt" "POSIXt"类(这样您就可以从/向它减去/添加天数、分钟等)，您可以这样做。

# Your data
temp <- c("2007/11/0103", "2007/11/0104", "2007/11/0105", "2007/11/0106")

temp2 <- strptime(temp, "%Y/%m/%d%H")
## [1] "2007-11-01 03:00:00 IST" "2007-11-01 04:00:00 IST" "2007-11-01 05:00:00 IST" "2007-11-01 06:00:00 IST"

例如，您可以提取小时数。

temp2$hour
## [1] 3 4 5 6

增加小时

temp2 + 3600
## [1] "2007-11-01 04:00:00 IST" "2007-11-01 05:00:00 IST" "2007-11-01 06:00:00 IST" "2007-11-01 07:00:00 IST"

诸若此类。如果您只想要您在问题中提到的格式(这只是一个字符串)，您也可以这样做。

format(strptime(temp, "%Y/%m/%d%H"), format = "%Y/%m/%d %H:%M")
#[1] "2007/11/01 03:00" "2007/11/01 04:00" "2007/11/01 05:00" "2007/11/01 06:00"

Answer 3

paste和substr是你在这里的朋友。在查看文档之前键入?

my.parser <- function(a){
  paste0(substr(a, 0,10),' ',substr(a,11,12),':00') # paste0 is like paste but does not add whitespace
}

a<- '2007/11/0103'
my.parser(a) # = "2007/11/01 03:00"