本篇內(nèi)容介紹了“如何用R語言數(shù)據(jù)合并一行”的有關(guān)知識，在實際案例的操作過程中，不少人都會遇到這樣的困境，接下來就讓小編帶領(lǐng)大家學(xué)習(xí)一下如何處理這些情況吧！希望大家仔細閱讀，能夠?qū)W有所成！

創(chuàng)新互聯(lián)2013年至今，先為易縣等服務(wù)建站，易縣等地企業(yè)，進行企業(yè)商務(wù)咨詢服務(wù)。為易縣企業(yè)網(wǎng)站制作PC+手機+微官網(wǎng)三網(wǎng)同步一站式服務(wù)解決您的所有建站問題。

數(shù)據(jù)的合并

需要的函數(shù)

cbind(),rbind(),bind_rows(),merge()

準(zhǔn)備數(shù)據(jù)

我們先構(gòu)造一組數(shù)據(jù)，以便下面的演示

> data1<-data.frame(
+  namea=c("海波","立波","秀波"),
+  value=c("一波","接","一波")
+ )
> data1
 namea value
1 海波 一波
2 立波  接
3 秀波 一波
> data2<-data.frame(
+  nameb=c("柯震東","劉強東","何盛東"),
+  value=c("東去","又","東來")
+ )
> data2
  nameb value
1 柯震東 東去
2 劉強東  又
3 何盛東 東來

按列合并

> cbind(data1,data2)
 namea value nameb value
1 海波 一波 柯震東 東去
2 立波  接 劉強東  又
3 秀波 一波 何盛東 東來

按行合并

按列合并是cbind()，那么按行合并自然是rbind()

> rbind(data1,data2)
Error in match.names(clabs, names(xi)) : 名字同原來已有的名字不相對

出現(xiàn)了錯誤，這是因為”namea“ 和”nameb“不同造成的，如果都為"namea" :

> data1<-data.frame(
+  namea=c("海波","立波","秀波"),
+  value=c("一波","接","一波")
+ )
> data1
 namea value
1 海波 一波
2 立波  接
3 秀波 一波
> data2<-data.frame(
+  namea=c("柯震東","劉強東","何盛東"),
+  value=c("東去","又","東來")
+ )
> data2
  namea value
1 柯震東 東去
2 劉強東  又
3 何盛東 東來
> #cbind(data1,data2)
> rbind(data1,data2)
  namea value
1  海波 一波
2  立波  接
3  秀波 一波
4 柯震東 東去
5 劉強東  又
6 何盛東 東來

對數(shù)據(jù)修改后，沒有出現(xiàn)錯誤。如果 不修改數(shù)據(jù)該怎么做：

為了解決這個問題，使用dplyr包中的bind_rows()函數(shù)，不要求合并字段的名稱必須相同，這個函數(shù)會自己做判斷。

> library(dplyr)
> dplyr::bind_rows(data1,data2)
 namea value nameb
1 海波 一波  <NA>
2 立波  接  <NA>
3 秀波 一波  <NA>
4 <NA> 東去 柯震東
5 <NA>  又 劉強東
6 <NA> 東來 何盛東

merge()

merge(x, y, by = intersect(names(x), names(y)),
   by.x = by, by.y = by, all = FALSE, 
   all.x = all, all.y = all,
   sort = TRUE, suffixes = c(".x",".y"),
   incomparables = NULL, ...)

merge函數(shù)參數(shù)的說明:

• x,y:用于合并的兩個數(shù)據(jù)框

• by,by.x,by.y:指定依據(jù)哪些行合并數(shù)據(jù)框,默認(rèn)值為相同列名的列.

• all,all.x,all.y:指定x和y的行是否應(yīng)該全在輸出文件.

• sort:by指定的列是否要排序.

• suffixes:指定除by外相同列名的后綴.

• incomparables:指定by中哪些單元不進行合并.

演示merge（）

data3<-data.frame(
 name = c("波","東","波","波"),
 type = c("秀","震","秀","秀"),
 class = c(10,5,4,11),
 num = c(85,50,90,90)
);data3
data4<-data_frame(
 name = c("波","東"),
 type = c("海","震"),
 class = c(5,5),
 num = c(88,81)
);data4

#合并data3和data4
> merge(data3,data4,all =T)
 name type class num
1  波  秀   4 90
2  波  秀  10 85
3  波  秀  11 90
4  波  海   5 88
5  東  震   5 50
6  東  震   5 81

#按照name,type,class合并data3.data4
> merge(data3, data4, by =c("name","type","class") , all = T)
 name type class num.x num.y
1  波  秀   4  90  NA
2  波  秀  10  85  NA
3  波  秀  11  90  NA
4  波  海   5  NA  88
5  東  震   5  50  81

“如何用R語言數(shù)據(jù)合并一行”的內(nèi)容就介紹到這里了，感謝大家的閱讀。如果想了解更多行業(yè)相關(guān)的知識可以關(guān)注創(chuàng)新互聯(lián)網(wǎng)站，小編將為大家輸出更多高質(zhì)量的實用文章！

當(dāng)前名稱：如何用R語言數(shù)據(jù)合并一行-創(chuàng)新互聯(lián)
網(wǎng)址分享：http://chinadenli.net/article6/hjeog.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供品牌網(wǎng)站建設(shè)、ChatGPT、品牌網(wǎng)站設(shè)計、移動網(wǎng)站建設(shè)、用戶體驗、外貿(mào)網(wǎng)站建設(shè)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)