This function normalize the data by absolute value
Examples
set.seed(20240412)
data1 <- gen_gaussian(n= 500, p = 4)
#> ✔ Data generation completed successfully!!!
normalize_data(data = data1)
#> # A tibble: 500 × 4
#> x1 x2 x3 x4
#> <dbl> <dbl> <dbl> <dbl>
#> 1 0.369 -0.180 -0.362 0.360
#> 2 0.106 -0.0432 -0.429 0.109
#> 3 -0.130 0.835 0.101 -0.00610
#> 4 0.0711 -0.0203 -0.143 0.107
#> 5 -0.0873 0.0955 0.114 0.275
#> 6 0.375 -0.279 -0.0424 -0.372
#> 7 0.0974 0.104 0.0309 0.0380
#> 8 -0.246 0.352 -0.0548 -0.251
#> 9 0.102 0.187 0.0759 -0.119
#> 10 -0.0608 0.280 0.153 -0.246
#> # ℹ 490 more rows