R语言数据处理

定量数据转化为等级数据：

编写函数A，a为数据集中的某一变量，将a转化为1，2，3，4的等级变量

             A <- function(a){

                 for(i in 1:length(a)){

               if(a[i]>=0 & a[i]<=5)

             a[i]=1

               else if(a[i]>5 & a[i]<=10)

             a[i]=2

               else if(a[i]>10 & a[i]<=15)

             a[i]=3

               else

             a[i]=4

                 }

              return(a)

            }

数据集处理：data1 <- data[which(data$A == “0”),]

                     data2 <- data[which(data$A == “1”),]

字符、数值转换：a <- c(1,2,3)  ##a为数值型：1，2，3

                a <- as.character(a)  ##将a转变为字符型：”1”  ”2”  ”3”

统计函数怎么用：均数：y <- mean(x)  ##y为x的算术平均数

                      z <- mean(x, trim = 0.05, na.rm = TRUE)  ##截尾平均数，丢弃了最大5%和最小5%的数据和所有缺失值后的算数平均数

                方差：y <- var(x)

                标准差：y <- sd(x)

中位数：y <- median(x)

例：a<-quantile(mydata$c,0.25)
       b<-quantile(mydata$c,0.75) 
       paste(median(mydata$c),"(",a[[1]],"-",b[[1]],")")

相关系数:将要计算相关系数的两个变量单独形成一个新的数据集

               datacor = data[,c(1,2)]  ##新的数据集，选出第一列和第二列

               cor(datacor)

相关系数矩阵检验：加载包psych

                  corr.test(datacor)