# \donttest{
LCVAR_outExample <- LCVAR(Data = ExampleData,
yVars = 1:4, ID = 5, Beep = 6,
xContinuous = 7, xFactor = 8,
Clusters = 1:2, Lags = 1:2,
Center = FALSE, Cores = 2,
RndSeed = 3, Rand = 2,
it = 25)
plot(LCVAR_outExample, show = "GNL", Number_of_Lags = 1)
plot(LCVAR_outExample, show = "GNC", Number_of_Clusters = 2)
plot(LCVAR_outExample, show = "specific", Model = c(1, 1))
plot(LCVAR_outExample, show = "specific", Model = c(1, 1), labels = c("A", "B", "C","D"))
plot(LCVAR_outExample, show = "specificDiff", Model = c(1, 1))
# }
Run the code above in your browser using DataLab