eq. (5.1) p.142 (re-export)

The same method as Msm010(), re-exported under this name; both run the same code.

Usage

Msm019(...)

Arguments

...

Passed unchanged to Msm010().

Value

The list returned by Msm010().

References

Montesinos Lopez, Montesinos Lopez & Crossa (2022), Multivariate Statistical Machine Learning Methods for Genomic Prediction, Springer. DOI 10.1007/978-3-030-89010-0.

Examples

set.seed(11)
g <- rep(1:5, each = 4)
X <- cbind(1, rnorm(20)); Z <- model.matrix(~ factor(g) - 1)
y <- as.numeric(X %*% c(2, 1) + Z %*% rnorm(5, sd = 0.7) + rnorm(20))
Msm019(X, Z, y, D = diag(0.5, 5))$blup
#> [1] -0.30112557 -0.05541619 -0.32441825  0.21335710  0.46760291