标签 - red

red    2016-02-29 16:18:13    7166    2    1

edition5.png

“十二五”国家规划教材:高等教育出版社 2020.2 图书详情


第五版云计算平台

https://www.jdwbh.cn/msaR

mvstats5-0.png

mvstats5-1.png

mvstats5-2.png

(第五版)配套资料:

例子数据:mvstats5.xlsx

例子代码:mvstats5.R

案例数据:mvcase5.xlsx

案例代码:mvcase5.R

习题数据:mvexer5.xlsx

自定义包:msaR.R

第五版可直接调用自定义函数 source("msaR.R")

(第五版)对应在线课程:

(1)中国大学MOOC: https://www.icourse163.org

(2) 学堂在线: https://next.xuetangx.com/course


电子表格数据的读取

下面以mvstats5.xlsx的d3.1数据读取为例。
数据格式见
详细操作见

读取方式一:使用openxlsx包, 并将第1列设为数据框行名, rowNames=TRUE

library(openxlsx) #加载包openxlsx,需安装:install.packages('openxlsx')
d3.1=read.xlsx('mvstats5.xlsx','d3.1',rowNames=TRUE);d3.1

读取方式二:使用readxl包, 并用函数msa.X将第1列设为数据框行名

library(readxl)   #加载包readxl, 需先安装包, install.packages('readxl')
d3.1=read_excel('mvstats5.xlsx','d3.1'); d3.1
source('msaR.R')  #调用第五版自定义函数!
d3.1=msa.X(d3.1)  #将第1列设为数据框行名


msa.X函数的源代码定义如下:
msa.X<-function(df){
  X=df[,-1];      #去除第1列以外的所有数