R/insertBackPipe.R

In samhinshaw/labnotebook: Functions for Sam's Lab Notebook

#' Insert \%<>\%.
#'
#' Call this function as an addin to insert \code{ \%<>\% } at the cursor position.
#' @importFrom rstudioapi insertText
#'
#' @export
insertBackPipe <- function() {
	rstudioapi::insertText(" %<>% ")
}