# NOT RUN {
# format dataset with physiodata
anisantha <- physiodata(subset(grasses, species == "Anisantha rubens"), x = "psi")
# bradford() uses the $proportions element within the physiodata object
b <- bradford(anisantha$proportions)
b # prints the main hydrotime variables
summary(b) # returns the main hydrotime variables as a data.table
plot(b) # plots the fitted model
# }
Run the code above in your browser using DataLab