data(lsa)
newData <- lsa[c(2,22,222,2222),-c(8,11)]
log1 <- dsldLogit(lsa,'bar','race1', newData, interactions = TRUE, 'TRUE')
coef(log1)
vcov(log1)
summary(log1)
predict(log1, newData)
log2 <- dsldLogit(data = lsa,
yName = 'bar',sName = 'gender',
interactions = FALSE, yesYVal = 'TRUE')
summary(log2)
Run the code above in your browser using DataLab