第七色在线视频,2021少妇久久久久久久久久,亚洲欧洲精品成人久久av18,亚洲国产精品特色大片观看完整版,孙宇晨将参加特朗普的晚宴

為了賬號安全,請及時綁定郵箱和手機立即綁定
已解決430363個問題,去搜搜看,總會有你想問的

只讀取選定列

只讀取選定列

冉冉說 2019-06-28 17:27:43
只讀取選定列有誰能告訴我如何只讀取以下數(shù)據(jù)的前6個月(7列),例如使用read.table()?Year   Jan  Feb  Mar  Apr  May  Jun  Jul  Aug  Sep  Oct  Nov  Dec   2009   -41  -27  -25  -31  -31  -39  -25  -15  -30  -27  -21  -252010   -41  -27  -25  -31  -31  -39  -25  -15  -30  -27  -21  -25 2011   -21  -27   -2   -6  -10  -32  -13  -12  -27  -30  -38  -29
查看完整描述

3 回答

?
至尊寶的傳說

TA貢獻1789條經(jīng)驗 獲得超10個贊

假設(shè)數(shù)據(jù)在文件中data.txt,您可以使用colClasses爭論read.table()跳過列。在這里,前7列中的數(shù)據(jù)是"integer"我們將其余6列設(shè)置為"NULL"指示應(yīng)該跳過它們。

> read.table("data.txt", colClasses = c(rep("integer", 7), rep("NULL", 6)), +            header = TRUE)
  Year Jan Feb Mar Apr May Jun1 2009 -41 -27 -25 -31 -31 -392 2010 -41 -27 -25 -31 -31 -393 2011 -21 -27  -2  -6 -10 -32

變化"integer"中詳細說明的可接受類型之一。?read.table取決于數(shù)據(jù)的真實類型。

data.txt看起來是這樣的:

$ cat data.txt 
"Year" "Jan" "Feb" "Mar" "Apr" "May" "Jun" "Jul" "Aug" "Sep" "Oct" "Nov" "Dec"2009 -41 -27 -25 -31 -31 -39 -25 -15 -30 -27 -21 -252010 -41 -27 -25 -31 -31 -39 -25 -15 -30 -27 -21 -252011 -21 -27 -2 -6 -10 -32 -13 -12 -27 -30 -38 -29

并且是通過以下方法創(chuàng)建的

write.table(dat, file = "data.txt", row.names = FALSE)

哪里dat

dat <- structure(list(Year = 2009:2011, Jan = c(-41L, -41L, -21L), Feb = c(-27L, -27L, -27L), Mar = c(-25L, -25L, -2L), Apr = c(-31L, -31L, -6L), May = c(-31L, -31L, -10L), Jun = c(-39L, -39L, -32L), Jul = c(-25L, -25L, -13L), Aug = c(-15L, -15L, -12L), Sep = c(-30L, -30L, -27L), Oct = c(-27L, -27L, -30L), Nov = c(-21L, -21L, -38L), Dec = c(-25L, -25L, -29L)), .Names = c("Year", "Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Oct", "Nov", "Dec"), class = "data.frame",row.names = c(NA, -3L))

如果事先不知道列數(shù),則實用程序函數(shù)count.fields將讀取文件并計數(shù)每一行中的字段數(shù)。

## returns a vector equal to the number of lines in the filecount.fields("data.txt", sep = "\t")## returns the maximum to set colClassesmax(count.fields("data.txt", sep = "\t"))


查看完整回答
反對 回復(fù) 2019-06-28
  • 3 回答
  • 0 關(guān)注
  • 559 瀏覽

添加回答

舉報

0/150
提交
取消
微信客服

購課補貼
聯(lián)系客服咨詢優(yōu)惠詳情

幫助反饋 APP下載

慕課網(wǎng)APP
您的移動學(xué)習(xí)伙伴

公眾號

掃描二維碼
關(guān)注慕課網(wǎng)微信公眾號