export the %>% pipe from magrittr

closes #107

DESCRIPTION

@@ -20,7 +20,8 @@ Depends:
     R (>= 3.1.2)
 Imports:
     dplyr (>= 0.5.0),
-    tidyr
+    tidyr,
+    magrittr
 License: MIT + file LICENSE
 LazyData: true
 RoxygenNote: 6.0.1

NAMESPACE

@@ -4,6 +4,7 @@ S3method(crosstab,data.frame)
 S3method(crosstab,default)
 S3method(tabyl,data.frame)
 S3method(tabyl,default)
+export("%>%")
 export(add_totals_col)
 export(add_totals_row)
 export(adorn_crosstab)
@@ -20,4 +21,5 @@ export(tabyl)
 export(top_levels)
 export(use_first_valid_of)
 importFrom(dplyr,"%>%")
+importFrom(magrittr,"%>%")
 importFrom(stats,setNames)

NEWS.md

@@ -12,7 +12,9 @@ NEWS
 
 ### Major
 
-#### Deprecated the following functions:
+* Exported the `%>%` pipe from magrittr [(#107)](https://github.com/sfirke/janitor/issues/107).
+
+**Deprecated the following functions:**
 * `use_first_valid_of()` - use `dplyr::coalesce()` instead
 * `convert_to_NA()` - use `dplyr::na_if()` instead
 * `add_totals_row()` and `add_totals_col()` - replaced by the single function `adorn_totals()`

R/utils.R

@@ -0,0 +1,13 @@
+# Copied from tidyr/R/utils.R, to export the magrittr pipe
+
+#' Pipe operator
+#'
+#' See \code{\link[magrittr]{\%>\%}} for more details.
+#'
+#' @name %>%
+#' @rdname pipe
+#' @keywords internal
+#' @export
+#' @importFrom magrittr %>%
+#' @usage lhs \%>\% rhs
+NULL