Construct an EnergyPlus `Schedule:Day:List` object using external CSV

sch_day_list_from_csv.R

library(eplusr)

# construct a fake schedule CSV file with 15 min interval and random values
interval <- 15
fake_data <- data.frame(
    time = seq(
        as.POSIXct("2020-03-15 00:15:00"),
        by = "15 mins",
        length.out = 24 * (60 / interval)
    ),
    value = round(runif(24 * (60 / interval)), 2)
)
path_csv <- tempfile(fileext = ".csv")
write.csv(fake_data, path_csv, row.names = FALSE)

# read the CSV in
data <- read.csv(path_csv)

# use the example model distributed with EnergyPlus v8.8 for illustration
path <- path_eplus_example(8.8, "1ZoneUncontrolled.idf")
idf <- read_idf(path)

# add an empty Schedule:Day:List object
sch <- idf$add(Schedule_Day_List = list("MySchedule", "Fraction", ..4 = interval))[[1]]

# extract the values of 1-4 fields into a list
val <- sch$value(1:4)

# combine the original field values together with your schedule data
sch$set(c(val, data$val))