Update title in README; rebuild
This commit is contained in:
@@ -8,8 +8,8 @@ Exercises: Data simulation for crossed random-effects models
|
||||
“manually”
|
||||
|
||||
``` r
|
||||
library(lattice)
|
||||
library(lme4)
|
||||
library("lattice")
|
||||
library("lme4")
|
||||
|
||||
#--------------- (1) Create data frame ----------------------------------------
|
||||
datsim <- expand.grid(subject = factor(c("s1" , "s2" , "s3" )),
|
||||
@@ -40,9 +40,9 @@ e <- rnorm(18, mean = 0, sd = se)
|
||||
sig <- matrix(c(sy0^2, ry * sy0 * sy1, ry * sy0 * sy1, sy1^2), 2, 2)
|
||||
y01 <- MASS::mvrnorm(3, mu = c(0, 0), Sigma = sig)
|
||||
y0 <- rep(y01[,1], each = 6)
|
||||
y1 <- rep(c(0, y01[1,2],
|
||||
0, y01[2,2],
|
||||
0, y01[3,2]), each = 3)
|
||||
y1 <- rep(c(0, y01[1, 2],
|
||||
0, y01[2, 2],
|
||||
0, y01[3, 2]), each = 3)
|
||||
|
||||
datsim$rt <- b0 + b1 + w + y0 + y1 + e
|
||||
|
||||
|
||||
Binary file not shown.
Reference in New Issue
Block a user