Select all data.frame columns between two variables

selectVariableRange.R

##                                                                          
##  Filename:      selectVariableRange.R
##  Creation Date: 07-08-2014
##  Last Modified: Do 07 Aug 2014 14:21:37 CEST
##                                                                          
##  Description: New Operator to define an vector with                                                            
##               index numbers of columns between two
##               variable names.                         
##


`%to%` <- function(x,y) {
  dat <- as.character(sys.call(1)[2])
  grep(x,names(eval(parse(text=dat)))):grep(y,names(eval(parse(text=dat))))
}


# Example
data(iris)

iris[,"Petal.Length"%to%"Species"]