I already know how to work the "simple formula" in Neural Network as follow:
f = as.formula(paste("logK ~",paste(n[!n %in% "logK"],