## Not run:
# ids <- isd_fips_stations(fips = "12086")$stations
# kendall_station <- int_surface_data(usaf_code = ids$usaf[11],
# wban_code = ids$wban[11],
# year = 1992,
# var = c("wind_speed", "temperature"))
# head(kendall_station)
# ## End(Not run)
Run the code above in your browser using DataLab