根据R中的字符选择行名[重复]

Question

我有一个字符 x：

x<-c("TTTCGATGTCCACACG", "TTTGTTGAGACGTCGA", "TTTGTTGTCATCTGTT")

和一个数据框 z

z <- data.frame (y=c(8, 10, 5, 10, 5, 10))
row.names (z) <- c("TTTCGATGTCCACACG", "TTTGTTGAGACGTCGA", "TTTGTTGTCATCTGTT", "TTTCGATGTCCAAACG", "TTTGTTGAATCCTCGA", "TTTGTTGTCATGTGTT")

我想选择与 x 中的名称匹配的列和行。

输出

                  y
TTTCGATGTCCACACG  8
TTTGTTGAGACGTCGA  10
TTTGTTGTCATCTGTT  5

Answer 1

R 基础

> z[rownames(z) %in% x, , drop=FALSE]
                  y
TTTCGATGTCCACACG  8
TTTGTTGAGACGTCGA 10
TTTGTTGTCATCTGTT  5

使用 dplyr

 library(dplyr)
 library(tibble)
 
 z %>% 
   tibble::rownames_to_column() %>% 
   filter(rowname %in% x)
           rowname  y
1 TTTCGATGTCCACACG  8
2 TTTGTTGAGACGTCGA 10
3 TTTGTTGTCATCTGTT  5