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

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

將數(shù)據(jù)框架從寬格式轉(zhuǎn)換為長格式

將數(shù)據(jù)框架從寬格式轉(zhuǎn)換為長格式

炎炎設(shè)計 2019-05-23 13:14:37
將數(shù)據(jù)框架從寬格式轉(zhuǎn)換為長格式將我data.frame從寬表轉(zhuǎn)換為長表時遇到一些麻煩。目前它看起來像這樣:Code Country        1950    1951    1952    1953    1954AFG  Afghanistan    20,249  21,352  22,532  23,557  24,555ALB  Albania        8,097   8,986   10,058  11,123  12,246現(xiàn)在我想把它data.frame變成一個長期的data.frame。像這樣的東西:Code Country        Year    ValueAFG  Afghanistan    1950    20,249AFG  Afghanistan    1951    21,352AFG  Afghanistan    1952    22,532AFG  Afghanistan    1953    23,557AFG  Afghanistan    1954    24,555ALB  Albania        1950    8,097ALB  Albania        1951    8,986ALB  Albania        1952    10,058ALB  Albania        1953    11,123ALB  Albania        1954    12,246我已經(jīng)看過并且已經(jīng)嘗試過使用melt()和reshape()一些人在類似問題中建議的功能。但是,到目前為止我只得到凌亂的結(jié)果。如果有可能我想用這個reshape()功能來做,因?yàn)樗雌饋碛悬c(diǎn)好處理。
查看完整描述

3 回答

?
心有法竹

TA貢獻(xiàn)1866條經(jīng)驗(yàn) 獲得超5個贊

使用重塑包:


#data

x <- read.table(textConnection(

"Code Country        1950    1951    1952    1953    1954

AFG  Afghanistan    20,249  21,352  22,532  23,557  24,555

ALB  Albania        8,097   8,986   10,058  11,123  12,246"), header=TRUE)


library(reshape)


x2 <- melt(x, id = c("Code", "Country"), variable_name = "Year")

x2[,"Year"] <- as.numeric(gsub("X", "" , x2[,"Year"]))


查看完整回答
反對 回復(fù) 2019-05-23
?
ITMISS

TA貢獻(xiàn)1871條經(jīng)驗(yàn) 獲得超8個贊

reshape()需要一段時間才能習(xí)慣,就像melt/ cast。假設(shè)您的數(shù)據(jù)框被調(diào)用,這是一個重塑的解決方案d:


reshape(d, direction = "long", varying = list(names(d)[3:7]), v.names = "Value", 

        idvar = c("Code","Country"), timevar = "Year", times = 1950:1954)


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

添加回答

舉報

0/150
提交
取消
微信客服

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

幫助反饋 APP下載

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

公眾號

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