R語言變量重編碼、重命名的操作
1、變量重編碼
重編碼涉及根據(jù)同一個變量和/或其他變量的現(xiàn)有值創(chuàng)建新值的過程，如將符合某個條件的值重新賦值等，這里主要介紹兩種常見的方法：
#第一種方法
per <- data.frame(name = c("張三","李四","王五","趙六"),
age = c(23,45,34,1000))
per
per$age[per$age == 1000] <- NA #設(shè)置缺失值
per$age1[per$age < 30] = "young" #生成新變量
per$age1[per$age >= 30 & per$age<50] <- "middle age"
per
#第二種方法
per <- data.frame(name = c("張三","李四","王五","趙六"),
age = c(23,45,34,1000))
per <- within(per,{
age1 <- NA
age1[age < 30] <- "young"
age1[age>=30 & age<50] <- "middle age"
})
per
2、變量的重命名
變量已經(jīng)存在，但是如果對變量名稱不滿意，可以對變量重新命名，這里提供以下幾種方法：
手動輸入。應(yīng)用fix()函數(shù)調(diào)出編輯框，手動輸入即可。
使用names()函數(shù)。格式為：names(x) <- value。需要指定對第幾個變量名進(jìn)行修改。
使用plyr包中的rename()函數(shù)。格式為rename(x, replace, warn_missing = TRUE, warn_duplicated = TRUE)，需要指定對哪個變量名進(jìn)行修改。
per <- data.frame(name = c("張三","李四","王五","趙六"),
age = c(23,45,34,1000))
per
#第一種方法：手動輸入
fix(per) #調(diào)出輸入框，手動輸入
#第二種方法，names()函數(shù)
per <- data.frame(name = c("張三","李四","王五","趙六"),
age = c(23,45,34,1000))
names(per)[2] <- "年齡" #指定第個變量重命名
per
#第三種方法
per <- data.frame(name = c("張三","李四","王五","趙六"),
age = c(23,45,34,1000))
library(plyr)
per <- rename(per,c(age="年齡")) #直接對變量名進(jìn)行修改
per
補(bǔ)充：R語言變量的處理（創(chuàng)建新變量 變量重新賦值）
創(chuàng)建新變量:
方法一:
#在mydata數(shù)據(jù)庫中創(chuàng)建新變量sum，sum是mydata數(shù)據(jù)庫中x1和x2之和 mydata$sum <- mydata$x1 + mydata$x2 #在mydata數(shù)據(jù)庫中創(chuàng)建新變量mean，sum是mydata數(shù)據(jù)庫中x1和x2平均 mydata$mean <- (mydata$x1 + mydata$x2)/2
eg:
> newwomen=women > newwomen$bmi=women$weight/women$height^2; > newwomen height weight bmi 1 58 115 0.03418549 2 59 117 0.03361103 3 60 120 0.03333333 4 61 123 0.03305563 5 62 126 0.03277836 6 63 129 0.03250189 7 64 132 0.03222656 8 65 135 0.03195266 9 66 139 0.03191001 10 67 142 0.03163288 11 68 146 0.03157439 12 69 150 0.03150599 13 70 154 0.03142857 14 71 159 0.03154136 15 72 164 0.03163580 >
方法二:
attach(mydata) #附上數(shù)據(jù)mydata mydata$sum <- x1 + x2 #在mydata數(shù)據(jù)庫中創(chuàng)建新變量sum mydata$mean <- (x1 + x2)/2 #新變量mean detach(mydata) #每次attach數(shù)據(jù)之后，應(yīng)該detach，解除之前的數(shù)據(jù)庫粘附
這個地方我們看見x1和x2變量前面不需要再使用mydata$，那是因?yàn)槲覀冎耙呀?jīng)附上mydata數(shù)據(jù)庫（attach)，這個時候，R已經(jīng)知道會利用附上的數(shù)據(jù)中的x1和x2變量直接計(jì)算。但是創(chuàng)建的新變量sum必須使用$在mydata數(shù)據(jù)庫之下，不然R就會計(jì)算出名字為sum，但是是個list性質(zhì)的單獨(dú)數(shù)據(jù)庫。
方法三：
mydata <- transform( mydata, sum = x1 + x2,mean = (x1 + x2)/2) #通過一行命令創(chuàng)建多個新變量。
newwomen=transform(women,bmi=weight/height^2) > newwomen height weight bmi 1 58 115 0.03418549 2 59 117 0.03361103 3 60 120 0.03333333 4 61 123 0.03305563 5 62 126 0.03277836 6 63 129 0.03250189 7 64 132 0.03222656 8 65 135 0.03195266 9 66 139 0.03191001 10 67 142 0.03163288 11 68 146 0.03157439 12 69 150 0.03150599 13 70 154 0.03142857 14 71 159 0.03154136 15 72 164 0.03163580
變量重新賦值
方法一：
mydata$agecat <- ifelse(mydata$age > 70,c("older"), c("younger")) # 創(chuàng)建年齡組別（2組）
該命令利用ifelse函數(shù)，有點(diǎn)類似于其他語言中的if….else。 該命令左邊告訴R我們需要在mydata數(shù)據(jù)庫里面創(chuàng)建新變量agecat（年齡組），該變量當(dāng)age>70時,年齡組變量賦值為older，其他情況下(age<=70)，年齡組變量賦值為younger。關(guān)于更多ifelse()信息和案例,可通過help(ifelse)查看。
方法二：
attach(mydata) mydata$agecat[age > 75] <- "Elder" mydata$agecat[age > 45 & age <= 75] <- "Middle Aged" mydata$agecat[age <= 45] <- "Young" detach(mydata) #創(chuàng)建變量agecat，并按照年齡大小直接賦值.
重命名
方法一
fix(mydata) #直接重命名，關(guān)閉時保存
方法二
library(reshape) mydata <- rename(mydata, c(oldname="newname")) #利用reshape包里面的rename函數(shù)直接重命名。
以上為個人經(jīng)驗(yàn)，希望能給大家一個參考，也希望大家多多支持腳本之家。如有錯誤或未考慮完全的地方，望不吝賜教。
相關(guān)文章
本文使用基本的繪圖命令plot、rect、segments、text繪制一把長10厘米的直尺，文中通過示例代碼介紹的非常詳細(xì)，具有一定的參考價(jià)值，感興趣的小伙伴們可以參考一下2022-01-01
R語言數(shù)據(jù)可視化包ggplot2畫圖之散點(diǎn)圖的基本畫法
散點(diǎn)圖主要用于描述兩個連續(xù)變量之間的關(guān)系,通過散點(diǎn)圖發(fā)現(xiàn)變量之間的相關(guān)性強(qiáng)度、是否存在線性關(guān)系等,下面這篇文章主要給大家介紹了關(guān)于R語言數(shù)據(jù)可視化包ggplot2畫圖之散點(diǎn)圖的基本畫法,需要的朋友可以參考下2022-11-11
R語言中的fivenum與quantile()函數(shù)算法詳解
這篇文章主要介紹了R語言中的fivenum與quantile()函數(shù)算法詳解，具有很好的參考價(jià)值，希望對大家有所幫助。一起跟隨小編過來看看吧2021-04-04
本文將結(jié)合實(shí)例代碼，介紹R語言的Dataframe常用操作使用，文中通過示例代碼介紹的非常詳細(xì)，需要的朋友們下面隨著小編來一起學(xué)習(xí)學(xué)習(xí)吧2021-06-06
在本篇文章里小編給大家整理的是一篇關(guān)于R語言運(yùn)算符知識點(diǎn)總結(jié)內(nèi)容，有興趣的朋友們可以學(xué)習(xí)參考下。2021-03-03
這篇文章主要介紹了R語言之左連接的三種實(shí)現(xiàn)操作，具有很好的價(jià)值，希望對大家有所幫助。一起跟隨小編過來看看吧2021-03-03
這篇文章主要介紹了R語言 檢驗(yàn)多重共線性的操作，具有很好的參考價(jià)值，希望對大家有所幫助。一起跟隨小編過來看看吧2021-04-04
R語言數(shù)據(jù)可視化繪圖Lollipop?chart棒棒糖圖
這篇文章主要介紹了R語言數(shù)據(jù)可視化繪圖Lollipop?chart棒棒糖圖2022-02-02
R語言繪圖時輸出希臘字符上下標(biāo)及數(shù)學(xué)公式實(shí)現(xiàn)方法
這篇文章主要為大家介紹了R語言進(jìn)行繪圖時輸出希臘字符上標(biāo)，下標(biāo)及數(shù)學(xué)公式的實(shí)現(xiàn)方法，有需要的朋友可以借鑒參考下，希望能夠有所幫助，祝大家多多進(jìn)步，早日升職加薪2021-11-11
R語言-實(shí)現(xiàn)將向量轉(zhuǎn)換成一個字符串
這篇文章主要介紹了R語言-實(shí)現(xiàn)將向量轉(zhuǎn)換成一個字符串，具有很好的參考價(jià)值，希望對大家有所幫助。一起跟隨小編過來看看吧2021-04-04