# \donttest{
  monthly = data = hydro_imgw("monthly", year = 1969, col_names = "polish")
  
  if (is.data.frame(monthly)) {
  abbr = hydro_shortening_imgw(data = monthly,
      col_names = "full",
      remove_duplicates = TRUE)
  head(abbr)
  }
# }
Run the code above in your browser using DataLab