参考资料:统计学——基于R(第二版)/贾俊平著
录入数据
> #以向量形式录入数据
> names <- c("张青松","王宇翔","田思雨","徐丽娜","张志杰","赵颖颖","王智强","宋丽媛","袁芳芳","张建国")
> stat <- c(68,23,57,87,90,34,67,54,90,98)
> math <- c(76,34,79,98,78,68,60,90,87,77)
> mark <- c(98,67,56,89,86,65,45,89,78,76)
> mana <- c(65,45,89,78,99,89,78,67,67,77)
> acco <- c(98,78,88,99,89,76,34,67,45,43)
> #将向量形式的数据组织成数据框形式
> table1_1 <- data.frame(学生姓名=names,统计学=stat,数学=math,营销学=mark,管理学=mana,会计学=acco)
> View(table1_1)
> #将向量形式的数据组织成矩阵形式
> matrix1_1 <- matrix(cbind(stat,math,mark,mana,acco),ncol=5) #按列合并并存储在matrix1_1中
> dimnames(matrix1_1) <- list(c("张青松","王宇翔","田思雨","徐丽娜","张志杰","赵颖颖","王智强","宋丽媛","袁芳芳","张建国"),c("统计学","数学","营销学","管理学","会计学"))
> setwd("C:/data")
> save(matrix1_1,file="table_test.RD