# Replicate the GLT results that were obtained in
# Case study 1 of Chapter 5 in Van der Elst (2023)
# ------------------------------------------------
data(Personality)
GLT.Openness <- GLT(Dataset=Personality,
Unrestricted.Model=Openness~LE, Restricted.Model=Openness~1)
summary(GLT.Openness)
# Replicate the GLT results that were obtained in
# Case study 2 of Chapter 5 in Van der Elst (2023)
# ------------------------------------------------
data(Fluency)
GLT.Fruits <- GLT(Dataset=Fluency,
Unrestricted.Model=Fruits~LE, Restricted.Model=Fruits~1)
summary(GLT.Fruits)
Run the code above in your browser using DataLab