data(co021)
co021.hdr <- list(site.id = "CO021",
site.name = "SCHULMAN OLD TREE NO. 1, MESA VERDE",
spp.code = "PSME", state.country = "COLORADO", spp = "DOUGLAS FIR",
elev = 2103, lat = 3712, long = -10830, first.yr = 1400, last.yr = 1963,
lead.invs = "E. SCHULMAN",
comp.date = "")
write.rwl(rwl.df = co021, fname = 'tmp.rwl', header=co021.hdr,
append=FALSE,prec=0.001)
Run the code above in your browser using DataLab