读取文件路径:一层目录(“示例”)、二层目录(“数据1”、“数据2”)下的表格数据。
“示例”文件下:
“数据1”文件下:
“数据2”文件下:
读取文件夹
rm(list=ls()) #清除变量
# getwd() #获取当前的工作目录
setwd("D:/data_r") #指定工作目录
first_file_name <- list.files("示例") #使用list.files得到“示例”文件夹的所有文件夹的名称
dir <- paste("./示例/",first_file_name,sep = "") #用paste命令构建路径变量dir
n <- length(dir) #读取dir长度(“示例”文件下的文件个数)
n_sub <- rep(0,n) #生成n个0向量
n_sub <- as.data.frame(n_sub) #转换成数据框
n_sub <- t(n_sub) #转置
<