6

我有一个同时需要reshapereshape2库的脚本。我知道这是不好的做法,但我认为plyr(或我正在使用的另一个库) Vennerable正在加载reshape并且我个人reshape2在很多地方都使用过。

问题是reshape2by的掩蔽reshape导致melt函数出现问题

# Example data frame
df <- data.frame(id=c(1:5), a=c(rnorm(5)), b=c(rnorm(5)))

# With just reshape2, variable and value columns are labelled correctly
library(reshape2)
melt(df, measure.vars=c("a", "b"), variable.name="type", value.name="distance")
   id type   distance
1   1    a -2.0233666
2   2    a  0.4625188
3   3    a -2.8688127
4   4    a  0.8151644
5   5    a -0.4574464
6   1    b  1.3197784
7   2    b  1.6213146
8   3    b  1.3508913
9   4    b -1.6483839
10  5    b -1.1342157

# But my script also has reshape loaded
library(reshape)
Loading required package: plyr

Attaching package: ‘reshape’

The following object(s) are masked from ‘package:plyr’:

    rename, round_any

The following object(s) are masked from ‘package:reshape2’:

    colsplit, melt, recast

# When calling melt in this environment, variable and value columns stick to 
# their default names
melt(df, measure.vars=c("a", "b"), variable.name="type", value.name="distance")
   id variable      value
1   1        a -2.0233666
2   2        a  0.4625188
3   3        a -2.8688127
4   4        a  0.8151644
5   5        a -0.4574464
6   1        b  1.3197784
7   2        b  1.6213146
8   3        b  1.3508913
9   4        b -1.6483839
10  5        b -1.1342157

我以为我可以专门meltreshape2using 中调用,reshape2::melt但我仍然遇到同样的问题。

有没有简单的方法解决这个问题?如果不是,我将不得不在每次熔化调用后直接手动重新标记列名。

4

2 回答 2

7

使用reshape2:::melt.data.frame(...).

melt实际上是一种方法:

> reshape2::melt
function (data, ..., na.rm = FALSE, value.name = "value") 
{
    UseMethod("melt", data)
}
<environment: namespace:reshape2>

因此,在数据框的情况下,R 将搜索melt.data.frame,它位于reshape

> melt.data.frame
function (data, id.vars, measure.vars, variable_name = "variable", 
    na.rm = !preserve.na, preserve.na = TRUE, ...) 
{
    ...
}
<environment: namespace:reshape>

正如我所指出的,最好的解决方案可能就是升级所有东西。确实plyr曾经加载过reshape,但现在不再加载了。(编辑:我在想ggplot2。)

于 2013-06-03T12:37:25.880 回答
0

考虑卸载 reshape 包并在必要时重新加载

detach("package:reshape", unload=TRUE)
于 2017-02-03T15:07:15.140 回答