## Note that this example will only work when executed on a
## computer connected to the net
## Not run:
# URL <- paste('ftp://ftp.ncdc.noaa.gov/pub/data/paleo/pollen/',
# 'asciifiles/fossil/ascfiles/gpd/rogerslk.txt', sep = '')
# rogerslk <- readGPDascii(URL)
# cat(writeGPDascii(rogerslk))
# ## End(Not run)
Run the code above in your browser using DataLab