众数插值法
来源:互联网 发布:js刷新form表单 编辑:程序博客网 时间:2024/05/16 11:44
library(Hmisc)
自定义众数函数
stat.mode <- function(x, rm.na = TRUE){
if (rm.na == TRUE){
y = x[!is.na(x)]
}
res = names(table(y))[which.max(table(y))]
return(res)
}
自定义函数,实现分组替补
my.impute <- function(data, category.col = NULL,
miss.col = NULL, method = stat.mode){
impute.data = NULL
for(i in as.character(unique(data[,category.col]))){
sub.data = subset(data, data[,category.col] == i)
sub.data[,miss.col] = impute(sub.data[,miss.col], method)
impute.data = c(impute.data, sub.data[,miss.col])
}
data[,miss.col] = impute.data
return(data)
}
final_house <- subset(my.impute(house, ‘区域’, ‘建筑时间’),select = c(区域,type.new,floow,面积,价格.W.,单价.平方米.,建筑时间))
final_house <- transform(final_house, builtdate2now = 2016-as.integer(substring(as.character(建筑时间),1,4)))
final_house <- subset(final_house, select = -建筑时间)
- 众数插值法
- 众数
- 众数
- 众数
- 众数
- 众数
- 众数
- 众数
- 众数
- 查找众数
- 众数问题
- 众数问题
- 众数问题
- 众数问题
- 寻找众数
- 众数问题
- 众数问题
- 众数问题
- 百度地图 右键事件,右键标线,获取线编辑的点数据
- 当Linux内存耗尽时
- Windows server 2008 R2 登录密码恢复
- Unity优化大全(四)之CPU-GC(内存回收)和Sricpt
- Shape 样式
- 众数插值法
- 第八章动作和动画-动画
- CSS外部引用方式
- 关于iOS UIAlertController自定义的那些事儿
- UML下的⑨种图~构件图、部署图
- 添加资源到android源码中-修改framework层
- 恩布企业IM,协同办公平台发布V1.24.1版本
- HttpWebRequest的GetResponse或GetRequestStream偶尔超时 + 总结各种超时死掉的可能和相应的解决办法
- AndFix Alibaba开源项目使用及基本原理