# \donttest{
# data
multi_sfn <- sfn_data_multi(ARG_TRE, ARG_MAZ, AUS_CAN_ST2_MIX)
data('sfn_metadata_ex', package = 'sapfluxnetr')
# metrics
multi_metrics <- daily_metrics(multi_sfn)
# tidyfing
multi_tidy <- metrics_tidyfier(
multi_metrics, sfn_metadata_ex, interval = 'general'
)
multi_tidy
# A really easier way of doing the same
multi_tidy_easy <- daily_metrics(multi_sfn, tidy = TRUE, metadata = sfn_metadata_ex)
# }
Run the code above in your browser using DataLab