R語言中提取兩個資料框中完全相同的行及保留唯一行
阿新 • • 發佈:2021-12-31
a <- 1:5 b <- letters[1:5] c <- LETTERS[1:5] d <- rep(1,5) dat1 <- data.frame(rbind(a,b,c)) dat2 <- data.frame(rbind(b,c,d)) dat1 dat2 dat3 <- rbind(dat1,dat2) dat3 dup <- dat3[duplicated(dat3),] dup uniq <- dat3[!duplicated(dat3),] uniq
> a <- 1:5 > b <- letters[1:5] > c <- LETTERS[1:5] > d <- rep(1,5) > dat1 <- data.frame(rbind(a,b,c)) > dat2 <- data.frame(rbind(b,c,d)) > dat1 ## 測試資料框1 X1 X2 X3 X4 X5 a 1 2 3 4 5 b a b c d e c A B C D E > dat2 ## 測試資料框2 X1 X2 X3 X4 X5 b a b c d e c A B C D E d1 1 1 1 1 > dat3 <- rbind(dat1,dat2) ## 按行合併兩個測試資料框 > dat3 X1 X2 X3 X4 X5 a 1 2 3 4 5 b a b c d e c A B C D E b1 a b c d e c1 A B C D E d 1 1 1 1 1 > dup <- dat3[duplicated(dat3),] ## 提取重複行 > dup X1 X2 X3 X4 X5 b1 a b c d e c1 A B C D E> uniq <- dat3[!duplicated(dat3),] ## 保留偉一行 > uniq X1 X2 X3 X4 X5 a 1 2 3 4 5 b a b c d e c A B C D E d 1 1 1 1 1