Funktion Fehler in R, nicht-numerisches Argument Binäroperators

Question

ich diese Funktion in R zu schaffen, die Normalisierung schaffen. In data2, YearlyIncome Spalte hat große Differenz vom niedrigsten Wert zum höchsten Wert. Ich möchte Normalisierung convert Wert von 0 bis 1

Die Wertewerte Funktion gelten YearlyIncome überschrieben.

> 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 

Was mache ich jetzt?

Answer 1

Hier werden subsetting wir die erste Spalte. Die apply wird dafür nicht benötigt.

fun(data$YearlyIncome) 

wo

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