R语言矩阵求助

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

1. x <- matrix(rnorm(100), nrow = 10)
   
2. colnames(x) <- combn(letters[1:8], 2, FUN = paste0, collapse = '')[seq_len(ncol(x))]
   
3. rownames(x) <- paste0('r', 1:10)

复制代码

求解：
从矩阵中提取每行所有大于 q 的数,返回列名及对应数值（对于返回值,请选择合适的数据结构）

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：R语言

dplyr::filter_all(.,any.vars(.>q))试试看

nieqiang110 发表于 2020-4-11 09:16
dplyr::filter_all(.,any.vars(.>q))试试看

抱歉，没做出来，但还是谢谢您！

1. > j <- x>0
   
2. > j
   
3.        ab    ac    ad    ae    af    ag    ah    bc    bd    be
   
4. r1   TRUE FALSE FALSE FALSE FALSE  TRUE  TRUE FALSE FALSE  TRUE
   
5. r2  FALSE FALSE FALSE  TRUE  TRUE  TRUE  TRUE FALSE  TRUE FALSE
   
6. r3  FALSE  TRUE  TRUE FALSE FALSE  TRUE  TRUE FALSE  TRUE  TRUE
   
7. r4  FALSE FALSE FALSE FALSE  TRUE FALSE  TRUE  TRUE FALSE FALSE
   
8. r5  FALSE FALSE  TRUE FALSE FALSE FALSE FALSE FALSE FALSE  TRUE
   
9. r6  FALSE FALSE  TRUE FALSE FALSE FALSE FALSE FALSE FALSE FALSE
   
10. r7  FALSE FALSE FALSE  TRUE FALSE FALSE FALSE  TRUE FALSE  TRUE
    
11. r8   TRUE  TRUE FALSE  TRUE  TRUE FALSE  TRUE FALSE  TRUE  TRUE
    
12. r9  FALSE  TRUE  TRUE  TRUE FALSE FALSE  TRUE FALSE  TRUE FALSE
    
13. r10  TRUE  TRUE FALSE FALSE  TRUE FALSE  TRUE FALSE FALSE FALSE
    
14. 
    
15. > x[1,j[1,]] #就是第一行中大于0的
    
16.        ab        ag        ah        be
    
17. 0.2360762 0.3257508 1.2379181 0.1111098

复制代码