R/breakBank.R

Defines functions breakBank

Documented in breakBank

breakBank<-function(itemBank){
nc<-ncol(itemBank)
itemPar<-matrix(as.numeric(as.matrix(itemBank[,1:(nc-1)])),nrow(itemBank),(nc-1))
cbGroup<-as.factor(itemBank[,nc])
res<-list(itemPar=itemPar,cbGroup=cbGroup)
return(res)}

Try the catR package in your browser

Any scripts or data that you put into this service are public.

catR documentation built on June 24, 2022, 9:06 a.m.