有没有办法缩短一系列colClasses

Question

目前我正在读取这样的数据文件:

setwd("N:/HH Scallop Growth Project/Ring data by cruise/")

growth <- read.csv("Growth.csv",sep=",",header=TRUE,
                    colClasses=c("character","character","character","numeric",
                                 "character","numeric","numeric","numeric",
                                 "numeric","numeric","numeric","numeric",
                                 "numeric","numeric","character","numeric",
                                 "character","numeric","numeric","numeric",
                                 "numeric","character","numeric","numeric",
                                 "numeric")) 

它工作正常,但它有点长/邋,,有没有办法缩短/分组colClasses？

Answer 1

尝试创建一个 25 向量，其条目全部为"numeric"，然后仅替换少数不为 的向量"character"。另请注意，header=TRUE和sep=","是默认值，read.csv因此可以省略它们。

colClasses <- replace(rep("numeric", 25), c(1:3, 5, 15, 17, 22), "character")
growth <- read.csv("Growth.csv", colClasses = colClasses)