# NOT RUN {
# collects from left to right
apply_left.character <- function(pipe_left_arg,
pipe_right_arg,
pipe_environment,
left_arg_name,
pipe_string,
right_arg_name) {
paste(pipe_left_arg, pipe_right_arg)
}
"a" %.>% 5 %.>% 7
# }
Run the code above in your browser using DataLab