orig/LR04/PC_72/PC_72.R

fpath <- file.path('..', 'orig', 'LR04', 'PC_72')
currwd <- getwd()
setwd(fpath)
PC_72 <-read.table("PC_72.txt",skip=34,header=FALSE,col.names=c("Depth.cm","Age.yrs","d18O.PDB"),sep="")
setwd(currwd)
mcrucifix/pleistocene documentation built on May 22, 2019, 3:20 p.m.