匹配矩阵
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 | a <- matrix ( c (1,2,3,4,5,6,7,8,9,10,11,12,13,14,15),nrow=3,ncol=5) c <- matrix ( c (2,3,3,3,3,4,4,4,4,8,8,8),nrow=3,ncol=4) rownames (a)<- c ( "aa" , "cc" , "kk" ) rownames (c)<- c ( "dd" , "cc" , "ee" ) > a [,1] [,2] [,3] [,4] [,5] aa 1 4 7 10 13 cc 2 5 8 11 14 kk 3 6 9 12 15 > c [,1] [,2] [,3] [,4] dd 2 3 4 8 cc 3 3 4 8 ee 3 4 4 8 > rownames (c) [1] "dd" "cc" "ee" > rownames (c) % in % rownames (a) [1] FALSE TRUE FALSE > which ( rownames (c) % in % rownames (a)) [1] 2 > a[ which ( rownames (c) % in % rownames (a)),] [1] 2 5 8 11 14 > c[ which ( rownames (c) % in % rownames (a)),] [1] 3 3 4 8 |
posted on 2023-04-04 20:28 Stellaself 阅读(71) 评论(0) 编辑 收藏 举报
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】凌霞软件回馈社区,博客园 & 1Panel & Halo 联合会员上线
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】博客园社区专享云产品让利特惠,阿里云新客6.5折上折
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步
· Deepseek官网太卡,教你白嫖阿里云的Deepseek-R1满血版
· 2分钟学会 DeepSeek API,竟然比官方更好用!
· .NET 使用 DeepSeek R1 开发智能 AI 客户端
· DeepSeek本地性能调优
· 一文掌握DeepSeek本地部署+Page Assist浏览器插件+C#接口调用+局域网访问!全攻略