Standardize response throwing errors

[hannahsfraser]

https://github.com/egouldo/ManyEcoEvo/blame/9d5b09b621ad77cb06925a9db1eff0a372340744/vignettes/data_cleaning_preparation.Rmd#L59

standardise_response(dat = blue_tit_effect_sizes,
estimate_type = "Zr",
param_table = NULL,
dataset = "blue tit") %>%
select(id_col, contains("beta"), adjusted_df, Zr, VZr )
#>
#> ── Computing meta-analysis inputsfor estimate_type = "Zr" ────────────────────
#>
#> ── Computing standardised effect sizes Zr and variance VZr ──
#>
#> ✖ Required values for computing standardised effect sizes missing:
#> ! Returning "NA" for tupple:
#> 1. beta_estimate NA,
#> 2. beta_se NA,
#> 3. adjusted_df 484.0193.
#> ✖ Required values for computing standardised effect sizes missing:
#> ! Returning "NA" for tupple:
#> 1. beta_estimate NA,
#> 2. beta_se NA,
#> 3. adjusted_df 666.56874.
#> ✖ Required values for computing standardised effect sizes missing:
#> ! Returning "NA" for tupple:
#> 1. beta_estimate NA,
#> 2. beta_se NA,
#> 3. adjusted_df 590.18263.
#> ✖ Required values for computing standardised effect sizes missing:
#> ! Returning "NA" for tupple:
#> 1. beta_estimate NA,
#> 2. beta_se 0.006225,
#> 3. adjusted_df NA.
#> ✖ Required values for computing standardised effect sizes missing:
#> ! Returning "NA" for tupple:
#> 1. beta_estimate NA,
#> 2. beta_se 0.003996,
#> 3. adjusted_df NA.
#> ✖ Required values for computing standardised effect sizes missing:
#> ! Returning "NA" for tupple:
#> 1. beta_estimate NA,
#> 2. beta_se NA,
#> 3. adjusted_df NA.
#> # A tibble: 10 × 6
#> id_col beta_estimate beta_SE adjusted_df Zr VZr
#>
#> 1 Ayr-1-2-2 NA NA 484. NA NA
#> 2 Ayr-1-2-3 NA NA 667. NA NA
#> 3 Ayr-1-2-1 NA NA 590. NA NA
#> 4 Bega-2-2-1 -4.05 2.11 389. -0.0972 0.00257
#> 5 Bega-2-2-2 -2.55 1.91 384. -0.0681 0.00260
#> 6 Bega-1-1-1 -9.2 2.45 388. -0.189 0.00257
#> 7 Bega-1-1-2 1.26 2.21 382. 0.0292 0.00262
#> 8 Bell-4-4-1 NA 0.00622 NA NA NA
#> 9 Bell-3-3-1 NA 0.00400 NA NA NA
#> 10 Bell-1-1-1 NA NA NA NA NA