Nothing
#' Parse weather column to (single) data frame. (DEPRECATED)
#'
#' @param x weather column (NOT name)
#'
#' @return data frame
#' @export
#'
#' @examples\dontrun{
#' result <- get_forecast("Kassel", units = "metric")$list
#' weather <- flatten_weather(result$weather)
#' weather$description %>% print()
#' }
flatten_weather <- function(x) {
.Deprecated("owmr_as_tibble")
lapply(x, function(df) {
df[1, ]
}) %>% do.call(rbind, .)
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.