Fix bug with missing values. Bump version to 0.1.3

hadley · Nov 18, 2008 · 154ed82 · 154ed82
1 parent c755c8b
commit 154ed82
Show file tree

Hide file tree

Showing 3 changed files with 8 additions and 3 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: plyr
 Type: Package
 Title: Tools for splitting, applying and combining data
-Version: 0.1.2
+Version: 0.1.3
 Date: 2008-10-10
 Author: Hadley Wickham <h.wickham@gmail.com>
 Maintainer: Hadley Wickham <h.wickham@gmail.com>

diff --git a/NEWS b/NEWS
@@ -1,4 +1,8 @@
-plyr 0.1.2 (2008-XX-XX) ---------------------------------------------------
+plyr 0.1.3 (2008-XX-XX) ---------------------------------------------------
+
+Fixed problem where when splitting by a variable that contained missing values, missing combinations would be drop, and labels wouldn't match up
+
+plyr 0.1.2 (2008-11-19) ---------------------------------------------------
 
   * a*ply now works correctly with array-lists
   * drop. -> .drop

diff --git a/R/split.r b/R/split.r
@@ -20,7 +20,8 @@
 #X splitter_d(mtcars, .(am, vs))
 splitter_d <- function(data, .variables = NULL) {
   splits <- eval.quoted(.variables, data, parent.frame())
-  splitv <- interaction(splits, drop=TRUE)
+  factors <- llply(splits, factor, exclude = NULL)
+  splitv <- interaction(factors, drop=TRUE)
 
   representative <- which(!duplicated(splitv))[order(unique(splitv))]
   split_labels <- data.frame(lapply(splits, function(x) x[representative]))