orig/LR04/ODP1143/ODP1143.R

fpath <- file.path('..', 'orig', 'LR04', 'ODP1143')
currwd <- getwd()
setwd(fpath)
ODP1143 <-read.delim("ODP1143.tab",skip=18,header=FALSE,col.names=c("Age.ka","Depth.mcd","Cwuellerstorfid18O.permilPDB","Sedrate.cmperka"),sep="") 
setwd(currwd)
mcrucifix/pleistocene documentation built on May 22, 2019, 3:20 p.m.