library(dplyr)
### Use data from six countries
data("forest_function_data_raw")
function_normalization(data = forest_function_data_raw, fun_cols = 6:31,
negative = c("soil_cn_ff_10","wue"), by_group = "country")
### Use partial data to quickly obtain output
### (Take the first 18 plots in Germany and the last 18 plots in Italy)
data("forest_function_data_raw")
GER_ITA_forest_function_raw <- filter(forest_function_data_raw,
country=="GER"|country=="ITA")[c(1:18,57:74),]
function_normalization(data = GER_ITA_forest_function_raw, fun_cols = 6:31,
negative = c("soil_cn_ff_10","wue"), by_group = "country")
Run the code above in your browser using DataLab