＃回复的地方不太对，其实是回复最早的问题，read table时指定特定一类的数据类型，两种方法：

# 方法1，read table时设置colClasses="character",然后把其他列一一转换成其他类型，比如：

Gradel <- read.table("table.txt",header=TRUE,sep="\t",colClasses="character")

Daten$A <- as.numeric(Daten$A)

Daten$C <- as.numeric(Daten$C)

#方法2:读两次表格，比较通用。第一次时不设置colClasses，然后把class类型放入colTypes，通过colTypes设置需要改变的类型。最后把colTypes代入colClasses再读一次表。

Gradel <-read.table("table.txt",header=TRUE,sep="\t")

colTypes <-sapply(Gradel,class)

colTypes［"B"］ <- "character"

Gradel <- read.table("table.txt",header=TRUE,sep="\t",colClasses=colTypes)