orig/LR04/GeoB1032/GeoB1032.R

fpath <- file.path('..', 'orig', 'LR04', 'GeoB1032')
currwd <- getwd()
setwd(fpath)
GeoB1032 <-read.delim("GeoB1032.tab",skip=25,header=FALSE,col.names=c("Event","Depth.m","Depthc.mcd","Age.ka","CaCO3.pc","Sand.pc","TOC.pc","Cwuellerstorfid13C.permilPDB","Cwuellerstorfid18O.permilPDB","Sedrate.cmperka","Waterwm.pc","DBD.gperccm"),sep="")
setwd(currwd)
mcrucifix/pleistocene documentation built on May 22, 2019, 3:20 p.m.