In WinVector/wrapr: Wrap R Tools for Debugging and Parametric Programming

How to make a UTF arrow operator using wrapr and addinexamplesWV (original note here).

library("addinexamplesWV")
op <- paste0('%', intToUtf8(8226), intToUtf8(10132), '%')
assign(op, wrapr::`%.>%`)
options("addinexamplesWV.usrFn1" =
          function() {
            rstudioapi::insertText(paste0(' ', op, ' '))
          })


7 %•➔% sqrt(.)