作者tony1331 (BLUE)
看板R_Language
标题[问题] 回圈用法请教
时间Sun Jun 4 14:03:09 2017
[问题类型]:
程式谘询(我想用R 做某件事情,但是我不知道要怎麽用R 写出来)
[软体熟悉度]:
新手(没写过程式,R 是我的第一次)
[问题叙述]:
K <- data.frame(matrix(NA,20,4000))
K[,] <- data.frame(sort(table(UU[UU$cust_no2 == c,][,15]),decreasing=T))[1:20,]
我有一组向量c,是不规则的,有2000个值,一次一个带进去会是一个20*2的资料,
所以我先把弄出20*4000的K,K[,1:2]是第一个值的结果,K[,3:4]是第二个值的结果,
感觉是要写2个回圈,但我试不出来,请问大家该怎麽写?
谢谢~
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 1.168.46.168
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/R_Language/M.1496556192.A.9E1.html
1F:→ a78998042a: temp.list = vector('list', length(c)) 06/04 14:38
2F:→ a78998042a: for(x in 1:length(c)) 06/04 14:38
3F:→ a78998042a: temp.list[[x]] = data.frame(sort(table(UU[UU$ 06/04 14:39
4F:→ a78998042a: cust_no2 == x,][,15]), decreasing=T))[1:20,] 06/04 14:39
5F:→ a78998042a: K = do.call(cbind, temp.list) 06/04 14:40
6F:→ a78998042a: 更正 "cust_no2 == x" 的x应该是c[x] 06/04 14:41
7F:→ tony1331: a大 谢谢你~ 我研究一下 06/04 15:18