# NOT RUN {
owm_data <- find_city("Malaga", units = "metric") %>%
owmr_as_tibble()
map <- leaflet() %>% addTiles() %>%
add_weather(
owm_data,
template = "<b>{{name}}</b>, {{temp}}<U+00B0>C",
icon = owm_data$weather_icon
)
# }
Run the code above in your browser using DataLab