Add 'other' magrittr pipe operators

DESCRIPTION

@@ -15,4 +15,4 @@ Imports:
     formatR
 License: MIT + file LICENSE
 LazyData: true
-RoxygenNote: 6.0.1
+RoxygenNote: 7.2.3

NAMESPACE

@@ -5,7 +5,9 @@ export(insertBizzaroPipeAddin)
 export(insertColonEqual)
 export(insertDotArrowPipeAddin)
 export(insertMagrittrCompoundPipeAddin)
+export(insertMagrittrExpositionPipeAddin)
 export(insertMagrittrPipeAddin)
+export(insertMagrittrTeePipeAddin)
 export(insertToDotPipeAddin)
 export(insertUsr1Addin)
 export(insertUsr2Addin)

R/insertMagrittrExpositionPipeAddin.R

@@ -0,0 +1,8 @@
+#' Insert \%$\% .
+#'
+#' Call this function as an addin to insert \code{\link[magrittr]{\%$\%}} (Magrittr pipe, \url{https://github.com/tidyverse/magrittr}) at the cursor position.
+#'
+#' @export
+insertMagrittrExpositionPipeAddin <- function() {
+  rstudioapi::insertText(" %$% ")
+}

R/insertMagrittrTeePipeAddin.R

@@ -0,0 +1,8 @@
+#' Insert \%T>\% .
+#'
+#' Call this function as an addin to insert \code{\link[magrittr]{\%T>\%}} (Magrittr pipe, \url{https://github.com/tidyverse/magrittr}) at the cursor position.
+#'
+#' @export
+insertMagrittrTeePipeAddin <- function() {
+  rstudioapi::insertText(" %T>% ")
+}

inst/rstudio/addins.dcf

@@ -29,6 +29,16 @@ Description: Inserts %<>% (Magrittr compound pipe) at the cursor position.
 Binding: insertMagrittrCompoundPipeAddin
 Interactive: false
 
+Name: Insert %$%
+Description: Inserts %$% (Magrittr Exposition pipe) at the cursor position.
+Binding: insertMagrittrExpositionPipeAddin
+Interactive: false
+
+Name: Insert %T>%
+Description: Inserts %T>% (Magrittr Tee pipe) at the cursor position.
+Binding: insertMagrittrTeePipeAddin
+Interactive: false
+
 Name: Insert :=
 Description: Inserts := at the cursor position.
 Binding: insertColonEqual