fix: evaluate Series methods in the correct environment

[etiennebacher]

Close #970

[eitsupi]

I was researching this as well. Please see this SO answer.
https://stackoverflow.com/questions/55813859/non-standard-evaluation-in-a-user-defined-function-with-lapply-or-with-in-r

As an important correction, we need to use match.call here, not sys.call.

f <- function(x, ..., y = 0) {x + y}

g1 <- function(x, y) {do.call(f, as.list(match.call()[-1]), envir = parent.frame())}
h1 <- function() {a <- 100; g1(1, a)}

g2 <- function(x, y) {do.call(f, as.list(sys.call()[-1]), envir = parent.frame())}
h2 <- function() {a <- 100; g2(1, a)}

h1()
#> [1] 101
h2()
#> [1] 1

^{Created on 2024-03-27 with reprex v2.1.0}

[etiennebacher]

Seems like we use sys.call() in several other places, should those be replaced too?

Otherwise, I think this is good to go, failures are due to some CI stuff

[eitsupi]

Seems like we use sys.call() in several other places, should those be replaced too?

I looked at it and it probably does not need to be updated.

I am thinking about tests that should be added. Once the tests are added, I merge this.

[eitsupi]

I have removed these as they are not directly related to this PR, but obviously they do not work on the Series.

[eitsupi]

CI failure is unrelated to this change.