Reordering factor gives different results, depending on which packages are loaded

by

This happens because:

  1. gmodels imports gdata
  2. gdata creates a new method for reorder.factor

Start a clean session. Then:

methods("reorder")
[1] reorder.default*    reorder.dendrogram*

Now load gdata (or load gmodels, which has the same effect):

library(gdata)
methods("reorder")
[1] reorder.default*    reorder.dendrogram* reorder.factor

Notice there is no masking, since reorder.factor doesn’t exist in base

Recreate the problem, but this time explicitly call the different packages:

group = c("C","F","D","B","A","E")
num = c(12,11,7,7,2,1)
data = data.frame(group,num)

The base R version (using reorder.default):

str(transform(data, group=stats:::reorder.default(group,-num)))
'data.frame':   6 obs. of  2 variables:
 $ group: Factor w/ 6 levels "C","F","B","D",..: 1 2 4 3 5 6
  ..- attr(*, "scores")= num [1:6(1d)] -2 -7 -12 -7 -1 -11
  .. ..- attr(*, "dimnames")=List of 1
  .. .. ..$ : chr  "A" "B" "C" "D" ...
 $ num  : num  12 11 7 7 2 1

The gdata version (using reorder.factor):

str(transform(data, group=gdata:::reorder.factor(group,-num)))
'data.frame':   6 obs. of  2 variables:
 $ group: Factor w/ 6 levels "A","B","C","D",..: 3 6 4 2 1 5
 $ num  : num  12 11 7 7 2 1

More Related Contents:

  1. Writing robust R code: namespaces, masking and using the `::` operator
  2. R: use magrittr pipe operator in self written package
  3. Using multiple criteria in subset function and logical operators
  4. How should I deal with “‘someFunction’ is not an exported object from ‘namespace:somePackage'” error? [closed]
  5. Is it a good practice to call functions in a package via ::
  6. What are the double colons (::) in R?
  7. How do I override a non-visible function in the package namespace?
  8. How do you determine the namespace of a function?
  9. How can a non-imported method in a not-attached package be found by calls to functions not having it in their namespace?
  10. Order of operator precedence when using “:” (the colon)
  11. “import as” in R
  12. What is the benefit of import in a namespace in R?
  13. XPath and namespace specification for XML documents with an explicit default namespace
  14. R: what’s the proper way to overwrite a function from a package?
  15. R install package loaded namespace
  16. How to sort a character vector where elements contain letters and numbers in R?
  17. Filter rows which contain a certain string
  18. Apply function conditionally
  19. Gantt charts with R
  20. Is set.seed consistent over different versions of R (and Ubuntu)?
  21. duplicates in multiple columns
  22. Filling area under curve based on value
  23. Command Lines error in Rstudio console
  24. Number of significant digits in dplyr summarise
  25. How do you delete a column by name in data.table?
  26. Applying a function to two lists?
  27. Merging two sets of data by data.table roll=’nearest’ function
  28. how can I handle vectors without knowing the type in Rcpp
  29. R data table: update join
  30. Importing “csv” file with multiple-character separator to R?

Leave a Comment