# NOT RUN {
# BA.geocode <- ggmap::geocode("Buenos Aires, Argentina")
BA.geocode <- data.frame(lon = -58.38156, lat = -34.60368)
sol_t <- solar_time(lubridate::dmy_hms("21/06/2016 10:00:00", tz = "UTC"),
BA.geocode)
sol_t
class(sol_t)
sol_d <- solar_time(lubridate::dmy_hms("21/06/2016 10:00:00", tz = "UTC"),
BA.geocode,
unit.out = "datetime")
sol_d
class(sol_d)
# }
Run the code above in your browser using DataLab