# load packageslibrary(sapfluxnetr)library(ggplot2)# ARG_MAZ example site datadata('ARG_MAZ',package ='sapfluxnetr')data('sfn_metadata_ex',package ='sapfluxnetr')# plot site sapflow measurements versus vpdsfn_plot(ARG_MAZ,formula_env =~ vpd)

# daily sapflow and environmental metricsarg_maz_metrics<-daily_metrics(  ARG_MAZ,tidy =TRUE,metadata = sfn_metadata_ex)#> [1] "Crunching data for ARG_MAZ. In large datasets this could take a while"#> [1] "General data for ARG_MAZ"# plot daily aggregationsggplot(arg_maz_metrics,aes(x = vpd_q_95,y = sapflow_q_95,colour = pl_code))+geom_point()

# ARG_TRE and AUS_CAN_ST2_MIX example sitesdata('ARG_TRE',package ='sapfluxnetr')data('AUS_CAN_ST2_MIX',package ='sapfluxnetr')multi_sfn<-sfn_data_multi(ARG_TRE, ARG_MAZ, AUS_CAN_ST2_MIX)# plotting the individual sites. It creates a list of plotsplots_list<-sfn_plot(multi_sfn,formula_env =~ vpd)plots_list[['AUS_CAN_ST2_MIX']]#> Warning: Removed 526066 rows containing missing values or values outside the scale range#> (`geom_point()`).

# daily sapflow standard metricsmulti_metrics<-daily_metrics(  multi_sfn,tidy =TRUE,metadata = sfn_metadata_ex)#> [1] "Crunching data for ARG_TRE. In large datasets this could take a while"#> [1] "General data for ARG_TRE"#> [1] "Crunching data for ARG_MAZ. In large datasets this could take a while"#> [1] "General data for ARG_MAZ"#> [1] "Crunching data for AUS_CAN_ST2_MIX. In large datasets this could take a while"#> [1] "General data for AUS_CAN_ST2_MIX"# plot daily aggregationsggplot(multi_metrics,aes(x = vpd_q_95,y = sapflow_q_95,colour = si_code))+geom_point(alpha =0.2)#> Warning: Removed 10966 rows containing missing values or values outside the scale range#> (`geom_point()`).

install.packages('sapfluxnetr')