Examples of how to get ggplot and lm style function calls.

gistfile1.txt

someFunction = function(y, data = NULL)
{
  arguments <- as.list(match.call())
  y = eval(arguments$y, data)
  sum(y)
}

myData = data.frame(A = c(1,2,3), B = c(10,9,8))

someFunction(A, data=myData)
someFunction(B, data=myData)
someFunction(A)

X = c(1,2,3,4,5,6)
someFunction(X)
someFunction(X, data=myData)

A = c(1,2)
someFunction(A)
someFunction(A, data=myData)

someFunction("A", data=myData)