我正在使用该cast
函数创建一个宽格式的数据框。我希望能够控制使用产生的列的顺序cast
. 这可能吗?
在下面的示例中,它们是有序的:cogs_xdep, sales, sga
我想订购它们:sales, cogs_xdep, sga
整个过程实际上从我使用的宽格式框架开始melt
它在演员表之前转换成一个长格式。
下面是一个例子
>rawdata_all
coy_name gvkey_iid factor X20130930 X20130831 X20130731 X20130630 X20130531 X20130430 X20130331 X20130228 X20130131 X20121231
1 Coy 1 111111 sales 1 2 3 4 5 6 7 8 9 10
2 Coy 2 22222 sales 2 12 22 32 42 52 62 72 82 92
3 Coy 3 333333 sales 3 103 203 303 403 503 603 703 803 903
4 Coy 1 111111 cogs_xdep 4 5 6 7 8 9 10 11 12 13
5 Coy 2 22222 cogs_xdep 5 15 25 35 45 55 65 75 85 95
6 Coy 3 333333 cogs_xdep 6 106 206 306 406 506 606 706 806 906
7 Coy 1 111111 sga 7 8 9 10 11 12 13 14 15 16
8 Coy 2 22222 sga 8 18 28 38 48 58 68 78 88 98
9 Coy 3 333333 sga 9 109 209 309 409 509 609 709 809 909
...
融化成长格式
> non_data_cols <- 3 # There are 3 non-value columns
> master_long <- melt(rawdata_all, id=1:non_data_cols,measured=(non_data_cols+1):length(rawdata_all))
> master_long
coy_name gvkey_iid factor variable value
1 Coy 1 111111 sales X20130930 1
2 Coy 2 22222 sales X20130930 2
3 Coy 3 333333 sales X20130930 3
4 Coy 1 111111 cogs_xdep X20130930 4
5 Coy 2 22222 cogs_xdep X20130930 5
6 Coy 3 333333 cogs_xdep X20130930 6
7 Coy 1 111111 sga X20130930 7
8 Coy 2 22222 sga X20130930 8
...
最后投射“因素”以创建更广泛的数据框。(我还将“变量”重命名为“日期”,并从日期值的开头删除了“X”)。
> master <- cast(master_long, ...~factor)
coy_name gvkey_iid date cogs_xdep sales sga
1 Coy 1 111111 20130930 4 1 7
2 Coy 1 111111 20130831 5 2 8
3 Coy 1 111111 20130731 6 3 9
4 Coy 1 111111 20130630 7 4 10
5 Coy 1 111111 20130531 8 5 11
6 Coy 1 111111 20130430 9 6 12
7 Coy 1 111111 20130331 10 7 13
8 Coy 1 111111 20130228 11 8 14
9 Coy 1 111111 20130131 12 9 15
10 Coy 1 111111 20121231 13 10 16
...
理想情况下,我希望按以下顺序排列最后 3 列:sales、cogs_xdep、sga。cast
似乎已按字母顺序排列它们,您可以看到它们在原始数据帧和长格式数据帧中都以所需的方式排序。
任何建议将不胜感激。虽然重新排列只有 3 列的列很容易,但在 30 列以上的实际情况下更麻烦。
谢谢,