# We can generate some random data by first creating a population correlation matrix
sig <- matrix(c(1.00,.4,.6,.05,.1,-.05,.4,1.00,.5,.08,
-.02,.03,.6,.5,1.00,.09,.1,-.07,.05,.08,.09,1.00,.6,.7,.1,-.02,.1,.6,
1.00,.5,-.05,.03,-.07,.7,.5,1.00), ncol=6, byrow=TRUE)
sig
library(mvtnorm)
# Now create random data based on this population matrix
d <- rmvnorm(100, sigma=sig)
#Now use MTMM on this data.frame indicating that there are 2 traits and 3 methods.
MTMM(d, 2, 3)
Run the code above in your browser using DataLab