不想用循环，如何用*apply实现同样的目的

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

请教下：

有一组数据，比如

a <- c(1, 2, 3, 2, 3, 2, 3, 4, 5, 4, 3, 4)
names(a) <- c('x', 'x', 'x', 'x', 'x', 'x', 'y', 'y', 'y', 'y', 'z', 'z')


那么，我想将a变成一个矩阵， 是的名字相同的数据处于同一列下。


不用循环，用*apply语句应该怎么才能比较快的实现呢？？？

谢谢

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：apply appl App 如何用 如何

虽然不太懂、但是给你踩踩

变成一个矩阵？矩阵要求每一列的长度相同，你这xyz的长度不一样，没法变成矩阵。或者你变成矩阵是为了啥目的

望路人 发表于 2015-1-7 12:02
变成一个矩阵？矩阵要求每一列的长度相同，你这xyz的长度不一样，没法变成矩阵。或者你变成矩阵是为了啥目的 ...

长度不一样的可以用NA代替，变成矩阵一是函数的要求，而是变成矩阵求平均数之类的方便，看起来也方便

1. sapply(unique(names(a)),function(x) c(a[names(a)==x],rep(NA,max(table(names(a)))-length(a[names(a)==x]))))

复制代码

yywan0913 发表于 2015-1-7 14:23

明白了，看来主要还是写function的功底，谢谢