Standardise SAE Predictions

Usage

sae_scale(x, center = TRUE, scale = TRUE)

Arguments

x: An hbsae_results object.
center: Logical or numeric centering (passed to base::scale).
scale: Logical or numeric scaling (passed to base::scale).

Value

A new hbsae_results object with standardised predictions.

Examples

p <- structure(list(result_table = data.frame(Prediction = 1:5,
                                               RSE_percent = rep(5, 5)),
                     rse_model = 5, pred = 1:5),
                class = "hbsae_results")
sae_scale(p)
#> 
#> Small Area Estimates  [hbsae_results]
#> --------------------------------------
#>  Areas       : 5 
#>  Overall RSE : 5 % 
#>  Pred. range : -1.265 to 1.265 
#>