Функция Ошибка в R, нечисловой аргумент для двоичного оператора

Question

Я создаю эту функцию в R, которая создаст нормализацию. Столбец data2, YearlyIncome имеет большую разницу от минимального значения до наивысшего значения. Я хочу нормализовать значение преобразования от 0 до 1.

Значения значений функции приложения переписываются на YearlyIncome.

> x <- data2$YearlyIncome 
> a <- min(x) 
> b <- max(x) 
> fun <- function(x){ (x - a)/(b - a) } 
> fun(data$YearlyIncome) 
Error in data$YearlyIncome : object of type 'closure' is not subsettable 
> fun <- function(x){ (x - min(x))/(max(x) - min(x)) } 
> fun(data2[1]) 
Show Traceback 

Rerun with Debug 
Error in FUN(X[[i]], ...) : 
    only defined on a data frame with all numeric variables 
But I got this error: 
>Error in x - a : non-numeric argument to binary operator 

Так что теперь делать?

Answer 1

Здесь мы подмножаем первый столбец. Для этого не нужен apply.

fun(data$YearlyIncome) 

где

fun <- function(x){ (x - min(x))/(max(x) - min(x)) }