作者eco100 ( )
看板R_Language
标题[问题] 字串元素个数计算跟加总?
时间Fri Mar 17 11:51:17 2017
不好意思,新手又来问问题了
假设我有如下的资料
no1 ABAEDHD
no2 ABCCREA
no3 GCDEHIRE
我想得到 A B C D E G H I
4 3 3 3 4 1 2 1
这样的结果
就是把第二栏位 不管哪一行的字串 的字元计数加总
我自己的作法是用回圈 先算出每一行的计数最後再加总
想请问有没有更快更有效率的方式?
感谢
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 140.109.32.9
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/R_Language/M.1489722679.A.487.html
1F:推 cywhale: do.call("paste",list(dt$V2, collapse="")) %>% 03/17 12:29
2F:→ cywhale: strsplit(split="") %>% table() 03/17 12:30
3F:推 allen1985: table(unlist(sapply(dt$no, function(x) 03/17 13:01
4F:→ allen1985: strsplit(x,"")))) 03/17 13:01
5F:→ celestialgod: 一楼做法比较好,vectorize程度比较高 03/17 19:10
6F:推 memphis: 为什麽要do.call? 直接贴起来不就好了? 03/17 21:08
7F:→ celestialgod: 没差(摊手,do.call => do a function call 03/18 08:33
8F:→ celestialgod: 你用paste0(dt$V2, collapse="")跟 03/18 08:34
9F:→ celestialgod: do.call("paste",list(dt$V2, collapse="")) 是一样 03/18 08:34
10F:→ celestialgod: do.call第一个element可以不用quote拉~~ 03/18 08:34
11F:→ celestialgod: argument 03/18 08:34