indice <- createDataPartition(dados_clientes$inadimplente
,p = 0.75
,list = TRUE
,times = 1)
indice <- dados_clientes[indice,]
dados_treino<- dados_clientes[ indice, ]
dados_teste <- dados_clientes[-indice, ]
when execute code
dados_treino<- dados_clientes[ indice, ]
Error in xj[i] : invalid subscript type 'list'
dados_teste <- dados_clientes[-indice, ]
Error in xj[i] : invalid subscript type 'list'