#LRSM for two measurement points
#20 subjects, 2*3 items, W generated automatically, first parameter set to 0,
#no standard errors computed.
data(lrsmdat)
res <- LRSM(lrsmdat, mpoints = 2, groupvec = 1, sum0 = FALSE, se = FALSE)
print(res)
Run the code above in your browser using DataLab