DF_XIAO的专栏

rm(list=ls()) gc() memory.limit(4000) library(corrplot) library(rpart) data_health<-read.csv("D:/smart_data0608/smart_data_section_good_15.txt",header=FALSE,sep="\t",na.strings="None")#读健康数据 data_fau

线性函数拟合（y=a+bx） 1.       R运行实例 R语言运行代码如下：绿色为要提供的数据，黄色标识信息为需要保存的。   x y data1=data.frame(x=x,y=y)  #数据存入数据框   #拟合线性函数 lm.data1 summary(lm.data1)        #输出拟合后信息 Call: lm(formula = data1$y