data(canopy_oc_file)
data(trait_file)
final_data_st <- prepare_RHC_data(canopy_oc_file, trait_file)
row_indices <- 1:17
plots.samples <- plot_samples(final_data_st, row_indices, plot_title_prefix = "Sample", ncol = 3)
Run the code above in your browser using DataLab