testData/parser/r/Operator.r (
3
lines of code) (
raw
):
`%myop%` <- function(a, b) {2*a + 2*b} # use own operator 1 %myop% 1 #[1] 4 1 %myop% 2 #[1] 6