data(ctd)
new <- renameData(ctd, "temperature", "temperature68")
new <- ctdAddColumn(new, T90fromT68(new[["temperature68"]]),
"temperature", "Temperature",
list(unit=expression(degree*C),scale="ITS=90"))
Run the code above in your browser using DataLab