rownames(X_train) <- seq(1,nrow(X_train)) ---------------------------------------------------------------- Daniel Tiezzi, MD, PhD Oncologia / Mastologia Professor Associado - Livre Docente Departamento de Ginecologia e Obstetrícia Setor de Mastologia e Oncologia Ginecológica Faculdade de Medicina de Ribeirão Preto - USP Tel.: 16 3602-2488 e-mail: [email protected] <mailto:[email protected]> https://github.com/dtiezzi <https://github.com/dtiezzi>
> On 25 Nov 2020, at 16:03, ASANTOS por (R-br) <[email protected]> wrote: > > library(dplyr) > RES_F<-read.csv("https://raw.githubusercontent.com/Leprechault/trash/main/cnn_ds.csv"; > > <https://raw.githubusercontent.com/Leprechault/trash/main/cnn_ds.csv>,sep=",",h=T) > RES_train<-RES_F%>% group_by(status) %>% sample_n(1280) > X_train <- RES_train %>% select(-status) %>% as.matrix(nrow = > length(RES_train[,2]), ncol = ncol(RES_train)-1, byrow = TRUE) > str(X_train)
_______________________________________________ R-br mailing list [email protected] https://listas.inf.ufpr.br/cgi-bin/mailman/listinfo/r-br Leia o guia de postagem (http://www.leg.ufpr.br/r-br-guia) e forneça código mínimo reproduzível.
