Question

如何查看R语言包的源代码

Answer 1

#头两行是读取csv文件，逗号分隔值commaseperatedvalue，是一种简化的excel文件OrgData=read.csv("DownlinkPower_train.csv",header=T)TestData=read.csv("DownlinkPower_test.csv",header=T)#第四第五行是选取子集subset(),从OrgData里选出OrgData[,1]>0第一列为正的那些行。OrgData=subset(OrgData,OrgData[,1]>0)TestData=subset(TestData,TestData[,1]>0)#第六行是把data的列名字赋给OrgData_colnameOrgData_colname=colnames(OrgData)OrgData=cbind(OrgData,1)//cbind是合并矩阵？cbind是columnbind就是横着粘在一起竖着粘在一起是rbind，此处cbind(OrgData,1)就是在OrgData的最后加一列全是1#重新给列命名，c()是字符串的向量，相当于给最后一列命名"intercepts"colnames(OrgData)=c(OrgData_colname,"intercepts")#as.matrix相当于c++的cast强行转换格式，此处强行转换成矩阵格式#dim(OrgData)是输出OrgData的行数和列数，[2]引用的是列，2:列数就是取OrgData中2到最后一列，其实此处可以用ncol(OrgData)来找列数x1=as.matrix(OrgData[,2:dim(OrgData)[2]])#把OrgData的第一列给y1y1=OrgData[,1]