rnoaa (version 0.1.0)

noaa_seaice: Get sea ice data.

Description

Get sea ice data.

Usage

noaa_seaice(url, ...)

Arguments

url

A url for a NOAA sea ice ftp file

...

Further arguments passed on to readshpfile function, see readshpfile

Value

• A data.frame

Examples

# Look at data.frame's for a series of years for Feb, South pole
urls <- sapply(seq(1979,1990,1), function(x) seaiceeurls(yr=x, mo='Feb', pole='S'))
out <- llply(urls, noaa_seaice)
lapply(out, head)

# Map a single year/month/pole combo
urls <- seaiceeurls(mo='Apr', pole='N', yr=1990)
out <- noaa_seaice(urls)
ggplot(out, aes(long, lat, group=group)) +
   geom_polygon(fill="steelblue") +
   theme_ice()

# Map all years for April only for North pole
urls <- seaiceeurls(mo='Apr', pole='N')
registerDoMC(cores=4)
out <- llply(urls, noaa_seaice, .parallel=TRUE)
names(out) <- seq(1979,2013,1)
df <- ldply(out)
ggplot(df, aes(long, lat, group=group)) +
  geom_polygon(fill="steelblue") +
  theme_ice() +
  facet_wrap(~ .id)

ggplot(df, aes()) + geom_point()