Compare methods for vf objects

Wouldn't it be nice to say (f > g)(x) rather than the terrible, tedious and error-prone f(x) > g(x)? Well, now you can!

Methods

signature(e1 = "ANY", e2 = "vf")

signature(e1 = "function", e2 = "vf")

signature(e1 = "vf", e2 = "ANY")

signature(e1 = "vf", e2 = "function")

signature(e1 = "vf", e2 = "vf")

Examples

x <- seq(from=0, to=2*pi, len=100)
(Sin > Cos*Tan)(x)
#>   [1] FALSE FALSE FALSE FALSE  TRUE FALSE  TRUE  TRUE  TRUE FALSE FALSE FALSE
#>  [13]  TRUE FALSE FALSE FALSE  TRUE  TRUE FALSE FALSE FALSE  TRUE  TRUE FALSE
#>  [25]  TRUE  TRUE FALSE FALSE FALSE  TRUE FALSE FALSE FALSE FALSE FALSE FALSE
#>  [37] FALSE FALSE FALSE FALSE  TRUE FALSE  TRUE  TRUE FALSE FALSE FALSE  TRUE
#>  [49]  TRUE  TRUE FALSE FALSE FALSE FALSE  TRUE FALSE  TRUE FALSE FALSE FALSE
#>  [61] FALSE FALSE FALSE FALSE FALSE FALSE FALSE FALSE  TRUE FALSE  TRUE FALSE
#>  [73] FALSE  TRUE FALSE  TRUE FALSE FALSE FALSE  TRUE  TRUE FALSE FALSE FALSE
#>  [85] FALSE FALSE FALSE FALSE FALSE FALSE FALSE  TRUE FALSE FALSE FALSE FALSE
#>  [97]  TRUE FALSE  TRUE FALSE