Как мне построить простую функцию, где все, что мне нужно предоставить, это переменная

Question

Мне интересно, почему это работает:

    fc <- function(s, i){  
      s <- data[i,]
      return(mean(s$V1, na.rm=T))
    }
    bootmean <- boot(data, fc, R=500)

Но это не так:

    fc <- function(s, i, x){  
      s <- data[i,]
      return(mean(s$x, na.rm=T))
    }
    bootmean <- boot(data, fc, R=500, x=V1)

Где V1 - это переменная во фрейме данных. Я в основном пытаюсь создать функцию, в которой мне нужно только указать

    bootmean <- boot(data, fc, R=500, x=V1)

, и она выполняет функцию для переменной, которую я предоставляю.

Пример Data =

    ID      V1
    1       2
    2       6
    3       3
    4       2
    5       5