Extract the call that was used to fit the given lcModel object.

# S3 method for lcModel
getCall(x, ...)

Arguments

x

The lcModel object.

...

Not used.

Value

A call to latrend() with the necessary arguments and data.

Examples

data(latrendData)
method <- lcMethodRandom("Y", id = "Id", time = "Time")
model <- latrend(method, latrendData)
getCall(model)
#> latrend(method = lcMethodRandom(alpha = 10, center = function(x){mean(x,na.rm=TRUE)}, 
#>     time = "Time", id = "Id", nClusters = 2, name = "random", 
#>     response = "Y"), data = latrendData, envir = NULL)