orig/LR04/DSDP607/DSDP607.R

fpath <- file.path('..', 'orig', 'LR04', 'DSDP607')
currwd <- getwd()
setwd(fpath)
DSDP607 <-read.delim("DSDP607.tab",skip=19,header=FALSE,col.names=c("Depth.m","Age.ka","Label", "Cibicidoidessppd18O.permilPDB","Cibicidoidessppd13C.permilPDB","Uvigerinasppd18O. permilPDB","Uvigerinasppd13C.permilPDB"),sep="")
setwd(currwd)
mcrucifix/pleistocene documentation built on May 22, 2019, 3:20 p.m.