R 有没有办法缩短一系列的类

目前，我正在读取如下数据文件：

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")) 

setwd（“N:/HH扇贝生长项目/cruise提供的环数据/”）
增长关于
rep
功能：

R> rep(1:3, 2:4)
[1] 1 1 2 2 2 3 3 3 3

大概是

cc = rep(c("character", "numeric"), c(2, 4))
read.csv("Growth.csv", header=TRUE, colClasses=cc)

可以使用长度和值构造列表

xList <- list(lengths = c(3,1,1,9,1,1,1,4,1,3)
              , values = rep(c("character", "numeric"), 5))

尝试创建一个25个向量，其条目都是
的“数值”
，然后用
的“字符”
替换其中的少数。还要注意，
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)

colClasses如果不显式指定
colClasses
，并且只使用
stringsAsFactors=FALSE
，该怎么办？这是否会导致错误的
colClasses
？
colClasses <- replace(rep("numeric", 25), c(1:3, 5, 15, 17, 22), "character")
growth <- read.csv("Growth.csv", colClasses = colClasses)