data(geopotential)
library(ggplot2)
ggplot(geopotential[date == date[1]], aes(lon, lat, z = gh)) +
geom_contour() +
scale_x_longitude() +
scale_y_latitude()
data(temperature)
ggplot(temperature[lon == lon[1] & lat == lat[1]], aes(air, lev)) +
geom_path() +
scale_y_level()
Run the code above in your browser using DataLab