我知道这是一个简单的问题,但是我真的很努力并且试图提高我的代码的效率。我有3个不同的数据集:
head(Porto_2014)
+ select(points_acc)
points_acc
1 3
2 6
3 9
4 10
5 11
6 12
head(Porto_2015) %>%
+ select(points_acc)
points_acc
1 3
2 4
3 7
4 10
5 13
6 14
head(Porto_2016) %>%
+ select(points_acc)
points_acc
1 3
2 6
3 6
4 9
5 10
6 13
我想创建一个新的数据框,points_by_season
其中的3列分别命名Season_X
为X
季节年份。我必须记得,我想精通用于编码的行。先感谢您
您可以使用 cbind
如果Porto_2014,Porto_2015和Porto_2016具有相同的行数:
points_by_season <- cbind(Season_2014=Porto_2014$points_acc
, Season_2015=Porto_2015$points_acc
, Season_2016=Porto_2016$points_acc)
如果它们的行数不相同:
tt <- seq_len(max(nrow(Porto_2014), nrow(Porto_2015), nrow(Porto_2016)))
points_by_season <- cbind(Season_2014=Porto_2014$points_acc[tt]
, Season_2015=Porto_2015$points_acc[tt]
, Season_2016=Porto_2016$points_acc[tt])
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句