获取预测模型
因为海藻数量基本是数值型数据,所以考虑进行回归分析(多元线性回归模型),一个变量和一组解释变量的关系
clean.algae <- knnImputation(algae,k = 10)
>lm.a1 <- lm(a1 ~ . ,data = clean.algae[,1:12])
#.的意思是求a1和其他所有的数据之间的线性关系;属性1+属性2的方法也行
> summary(lm.a1)
> #使用summary()查看结果
查看结果之后发现系统生成了几个辅助变量seasonspring
seasonsummer
seasonwinter
sizemedium
sizesmall