This function generates random noise dimensions by adding wavy patterns.
Examples
set.seed(20240412)
df <- gen_scurve(n = 500, p = 4) |> as.matrix()
#> ✔ Wavy shaped noise dimensions generation completed successfully! 🎉
#> ✔ Data generation completed successfully! 🎉
gen_wavydims3(n = 500, p = 4, data = df)
#> ✔ Wavy shaped noise dimensions generation completed successfully! 🎉
#> # A tibble: 500 × 4
#> x1 x2 x3 x4
#> <dbl> <dbl> <dbl> <dbl>
#> 1 -0.643 0.797 -1.78 0
#> 2 0.602 1.47 -0.199 0
#> 3 -0.771 0.353 1.63 0
#> 4 -0.983 1.21 0.789 0
#> 5 0.598 1.61 1.79 0
#> 6 0.232 0.706 -1.98 0
#> 7 -0.584 1.37 -1.81 0
#> 8 -0.314 0.468 0.0555 0
#> 9 0.974 0.752 -0.825 0
#> 10 0.531 1.84 -0.149 0
#> # ℹ 490 more rows