# NOT RUN {
{
data(gCO)
df <- to_as4wrf(sdf = gCO, dmyhm = "29-04-2018 00:00",
tz = "America/Sao_Paulo")
head(df)
df2 <- to_as4wrf(sdf = list(co = gCO, pm = gCO), dmyhm = "29-04-2018 00:00",
tz = "America/Sao_Paulo")
head(df2)
}
# }
Run the code above in your browser using DataLab