inTRW_1 <- inTRW[[1]]
stdTRW_df <- stdTRW(inTRW_1)
stdTRW_df |>
dplyr::group_by(year) |>
dplyr::summarise(N_trees = dplyr::n(),
mean_stdTRW = mean(stdTRW, na.rm = TRUE)) |>
ggplot2::ggplot(ggplot2::aes(year, N_trees)) +
ggplot2::geom_line()
Run the code above in your browser using DataLab