u010380670的博客

衍生变量data1 <- read.csv("数据转换数据.csv",na.strings = NA)#日期格式转换data1$registration <- as.Date(paste(substr(data1$registration,1,4), substr(data1$registration,5,6...

dummyVars(formula, data, sep = “.”, levelsOnly = FALSE, fullRank = FALSE, …)sep:因子变量名及其级别之间的可选分隔符。使用sep = NULL表示没有分隔符(即模型的正常行为)。data4 <- read.csv("玩家玩牌数据.csv")head(data4)library(VIM)aggr(data...

查看数据缺失情况questionnaire <- read.csv("问卷调研数据.csv",header = TRUE)dim(questionnaire)#查看行数和变量library(VIM)aggr(questionnaire[,-1],prop=FALSE,numbers=TRUE)#不要序号，以绝对数显示，有标签建立逻辑回归模型，对性别进行预测for(i in 2...