以下是 .csv 文件中的子集数据示例。有三列没有标题。第一列代表日期/时间,第二列是负载 [kw],第三列是 1 = 工作日,0 = 周末/假期。
9/9/2010 3:00 153.94 1
9/9/2010 3:15 148.46 1
我想在 R 中编程,以便它在 9 月的一个月内的所有工作日(当第三列为 1 时)的时间范围内从 10:00 到 20:00 选择第一列和第二列并且不知道是什么最好和最有效的编码方式。
code dt <- read.csv("file", header = F, sep=",")
#Select a column with weekday designation = 1, weekend or holiday = 0
y <- data.frame(dt[,3])
#Select a column with timestamps and loads
x <- data.frame(dt[,1:2])
t <- data.frame(dt[,1])
#convert timestamps into readable format
s <- strptime("9/1/2010 0:00", format="%m/%d/%Y %H:%M")
e <- strptime("9/30/2010 23:45", format="%m/%d/%Y %H:%M")
range <- seq(s,e, by = "min")
df <- data.frame(range)