2013-03-26 128 views

回答

7

看一看在colClasses參數函數read.table的:

df <- read.table(header = TRUE, colClasses=c(NA, "NULL", NA), text = ' 
       A B C 
       1 2 3 
       4 5 6') 
df 
# A C 
#1 1 3 
#2 4 6 

更新:

通過在頭部先讀名稱中選擇,然後創建一個colClasses向量:

# read the header 
header <- read.table(header = FALSE, nrow = 1, text = ' 
       A B C 
       1 2 3 
       4 5 6') 

# cols we want to select 
take <- c('A', 'B') 
# create vector for colClasses 
takecols <- ifelse(t(header) %in% take, NA, 'NULL') 

# read selected cols 
df <- read.table(header = TRUE, colClasses=takecols, text = ' 
       A B C 
       1 2 3 
       4 5 6')