• R语言基础篇——数据对象


    1、基本数据类型(numeric,logical,character,NA,double,complex,integer)

    2、日期变量

    常用函数

    Sys.Date()-返回系统当前的日期,Sys.time()-返回系统当前的日期和时间,date()-返回系统当前的日期和时间,

    as.Date()-将字符串形式的日期值转换为日期变量,as.Date(x,format="",...)

    as.POSIXllt()-将字符串转化为包含时间及时区的日期变量,as.POSIXllt(x,tz="",format)

    strptime()-将字符串变量转换为包含时间的日期变量,strptime(x,format,tz="")

    strfttime()-将日期变量转换为指定格式的字符串变量,strfttime(x,format)

    format()-将日期变量转换为指定格式的字符串变量,format(x,...)

    3、查看对象的类型

    class()、mode()、typeof()

    4、数据结构

    (1)向量

    向量创建:c()函数创建向量

    向量索引:#下标方式索引 vector<-c(1,2,3,4)  vector[1]   vector[c(1:3)]

         #按名称索引 names(vector)<-c("one","two","three","four")     vector[c("one","two")]

         #which方式索引  which(vector==1) which(vector==c(1,2))   which.max(vector)

           #subser方式索引  subset(vector,vector>2&vector<4)

         #%in%方式索引  c(1,5)%in%vector

    向量编辑 : #向量扩展(x<-c(x,c(5,6,7)))  #单个元素的删除  x<-x[-1]   #多个元素的删除  (x<-x[c(3:5)])

    向量排序:sort(x,decreasing = FALSE,na.last = TRUE...)      倒序——rev()函数

    等差数列的建立:seq(from = 1, to = 1, by =  ((to - from)/length.out - 1),length.out = NULL,...)   seq(1,-9,by = -2)

    重复数列的建立:rep(x,times=1,length.out=NA,each=1)    rep(1:3, each=2, times=2)  112233112233112233

    (2)矩阵

    创建矩阵:matrix(data=NA,nrow=1,ncol=1,byrow=FALSE,dimnames=NULL)

    x<-c(1:9)

    a<-matrix(x,nrow=5,ncol=2,byrow=FAlSE,dimnames=list(c("r1","r2","r3","r4","r5"),c("c1","c2")))

    矩阵和转换为向量:as.vector(),转换为向量时元素按列读取数据

    矩阵索引:#根据位置索引   a[2,1]

         #根据行和列的名称索引 a["r2","c2"]

         #使用一维下标索引  a[,2] 

         #使用数值型向量索引 a[c(3:5),2]

    矩阵编辑:#矩阵合并(a1<-rbind(a,c(11,12))) (a2<-rbind(a,c(11:15)))

         #删除矩阵中元素  a5<-a[-1,]  #删除矩阵中的第一行

    矩阵的运算:colSums()-对矩阵的各列求和  rowSums()-对矩阵的各行求和   colMeans()-对矩阵各列求均值  rowMeans()-对矩阵各行求均值

          t()-矩阵行列转换   det()-求解矩阵的行列式   crossprod()-求解两个矩阵的内积   outer()-求解矩阵的外积  %*%-矩阵乘法

          diag()-对矩阵取对角元素    solve()-对矩阵求解逆矩阵  eigen()-对矩阵求解特征值和特征向量

    (3)数组

    创建数组:array(data,dim=length(data),dimnames=NULL)

    x<-c(1:9)  

    dim1<-c("A1","A2","A3")

    dim2<-c("B1","B2","B3","B4","B5")

    dim3<-c("C1","C2")

    a<-array(x,dim=c(3,5,2),dimnames=list(dim1,dim2,dim3))

    数组索引:#按下标索引  a[2,4,2]

         #按维度名称索引a["A2","B3","C1"]

                 #查看数组的维度  dim(a)

    (4)数据框

    创建数据框:data.frame()

    #向量组成数据框

    data_iris<-data.frame(s.length=c(1,1,1,1),s.width=c(2,2,2,2),w.length=c(3,3,3,3),w.width=c(4,4,4,4))

    #矩阵组成数据框

    data_matrix<-matrix(c(1:8),c(4,2))

    data_iris2<-data.frame(data_matrix)

    数据框索引:#列索引  data_iris[,1]     ||     data_iris$s.length    ||    data_iris["s,length"]

                         #行索引   data_iris[1,]   || data_iris[1:3,]

           #元素索引  data_iris[1,1]         data_iris$s.length[1]       data_iris["s,length"][1]

           #subset索引  subset(data_iris, s.length=1)

           #sqldf函数索引  library(sqldf)  newdf<-sqldf("select * from mtcars where carb=1 order by mpg",row.names=TRUE)

    数据框编辑:#增加新的样本数据  data_iris<-rbind(data_iris,list(9,9,9,9))

          #增加数据集的新属性变量  data_iris<-rbind(data_iris,Species=rep(7,5))

          #数据框列名的编辑  names(data_iris)

    (5)因子

    创建因子序列 :

    将statistics分解成因子型变量,水平为26个小写字母 (ff<-factor(substring("statistics"),1:10,1:10,levels=letters))

    去除没有包含在向量中的水平  f<-factor(ff)

    #创建因子型向量,水平名称为letter  factor(letters[1:20],labels="letter")

    #创建有序的因子序列   z<-factor(LETTERS[1:4],ordered=TRUE)

    通过gl()函数创建因子序列   gl(n,k,length=n*k,labels=seq_len(n),ordered=TRUE)

    n-表示因子水平的个数  

    k-表示每个水平的重复数

    length-表示生成的序列的长度

    labels-一个n维向量,表示因子水平

    ordered-一个逻辑值,为TRUE表示有序因子,为FALSE则表示无序因子

    gl(2,3,labels=c("T","F"))

    因子的存储方式:

    > status<-c("Poor","Improved","Excellent","Poor")
    > class(status)    #查看向量的类型
    [1] "character"
    > s<-factor(status,ordered=TRUE)
    > s
    [1] Poor Improved Excellent Poor
    Levels: Excellent < Improved < Poor
    > class(s)
    [1] "ordered" "factor"   #查看数据的类型
    > storage.mode(s)  #查看存储类型,可以看出因子是按整数存储的
    [1] "integer"
    > as.numeric(s)   #转换为数值型向量
    [1] 3 2 1 3
    > levels(s)   #查看因子的水平
    [1] "Excellent" "Improved" "Poor"

    (6)列表

    创建列表:list(object1,object2,...)

    data<-list(a=c(1,2,3,4),b=c("true","false"),c=c("one","two","three","four"),d=(1+3i))

    列表索引:#列索引 data[[1]]   ||   data$a     ||data[["a"]]

        #元素索引  data[[1]][1]

    列表编辑:列表的编辑和向量类似,使用c()函数进行合并。  

    #增加名称为e的一列

    data1<-c(data,list(e=c(3,4,5)))

    或者data1<-c(data,e=list(c(3,4,5)))

  • 相关阅读:
    小米手机4 rom 下载链接
    java 两个线程交替打印到100
    获取积分最多的人(二)
    刷题通过的题目排名
    考试分数(二)
    牛客的课程订单分析(二)
    牛客的课程订单分析(三)
    docker使用小记
    Dynamic Graph Collaborative Filtering
    Learnable Embedding Sizes for Recommender Systems
  • 原文地址:https://www.cnblogs.com/bigdream6/p/8289898.html
Copyright © 2020-2023  润新知