suppressMessages(library(dplyr))
sessions <- head(evsim::california_ev_sessions, 10)
sessions %>%
select(ConnectionStartDateTime, ConnectionEndDateTime, Power)
adapt_charging_features(
sessions,
time_resolution = 60,
power_resolution = 0.01
) %>%
select(ConnectionStartDateTime, ConnectionEndDateTime, Power)
adapt_charging_features(
sessions,
time_resolution = 15,
power_resolution = 1
) %>%
select(ConnectionStartDateTime, ConnectionEndDateTime, Power)
Run the code above in your browser using DataLab