gpt4 book ai didi

在 R 中重组团队数据

转载 作者:行者123 更新时间:2023-12-01 12:40:00 25 4
gpt4 key购买 nike

我有一个看起来像这样的数据集:

Person      Team
36471430 15326406
37242356 15326406
34945710 15326406
29141024 15326406
10323768 15326124
647293 15326124
32358093 15326124
2144524 15326124
35199422 6692854
32651004 6692854
32309524 6692854
22701991 6692854
32343507 8540767
8343828 8540767
22669737 8540767
1128141 6596680
34840462 6596680
513193 6596523
8748403 6596523
29284130 15326509
8554552 15326509
33051835 15326628
32339184 15326628
32979394 15326628
30357112 15326628

我希望这些数据看起来像这样:

Team        Person 1    Person 2    Person 3    Person 4
15326406 36471430 37242356 34945710 29141024
15326124 10323768 647293 32358093 2144524
6692854 35199422 32651004 32309524 22701991
8540767 32343507 8343828 22669737 NA
6596680 1128141 34840462 NA NA
6596523 513193 8748403 NA NA
15326509 29284130 8554552 NA NA
15326628 33051835 32339184 32979394 30357112

我一直在用 R 工作,但我搞不懂。

仅供引用 - 4 不是每组的最大人数。有时每组有多达 30 人……我只是不想在这里打一个这么大的例子。此外,数据集中还有更多变量,但这些实际上是您真正需要回答我的问题的唯一变量(我认为)。

最佳答案

rbind.fill.matrix 可以在丢失名称的情况下做到这一点。我认为其他 reshape2 或 plyr 函数会更好:

> plyr::rbind.fill.matrix( tapply(dat$Person, dat$Team, matrix, nrow=1) )
1 2 3 4
[1,] 513193 8748403 NA NA
[2,] 1128141 34840462 NA NA
[3,] 35199422 32651004 32309524 22701991
[4,] 32343507 8343828 22669737 NA
[5,] 10323768 647293 32358093 2144524
[6,] 36471430 37242356 34945710 29141024
[7,] 29284130 8554552 NA NA
[8,] 33051835 32339184 32979394 30357112

我认为这在某些方面可能更好:

library(reshape2)
dcast(dat, Team ~ ., list)
Using Team as value column: use value.var to override.
Team NA
1 6596523 6596523, 6596523
2 6596680 6596680, 6596680
3 6692854 6692854, 6692854, 6692854, 6692854
4 8540767 8540767, 8540767, 8540767
5 15326124 15326124, 15326124, 15326124, 15326124
6 15326406 15326406, 15326406, 15326406, 15326406
7 15326509 15326509, 15326509
8 15326628 15326628, 15326628, 15326628, 15326628

关于在 R 中重组团队数据,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/25776846/

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com