Блог

Может ли кто-нибудь помочь мне с этим, т. Е. Я хочу применить функцию:

 denormalize <- function(x,y) { 
return((x*(max(y) - min(y)))   min(y)) 
}
  

для следующего набора данных, с каждым
Коэффициент как «x»:

и данные как «y»:

Следующее возвращает ожидаемое значение, хотя оно не обязательно простое:

 modelDenorm <- data.frame(cbind(Price = denormalize(modCoef$Price, data$Price),
                                Interest = denormalize(modCoef$Interest, data$Interest),
                                Inflation = denormalize(modCoef$Inflation, data$Inflation),
                                CCI = denormalize(modCoef$CCI, data$CCI)))
  

кроме того, существуют ли какие-либо другие применимые подходы? Спасибо вам всем

Используйте mapply , чтобы применить вашу функцию к обоим наборам данных. Просто убедитесь, что вы передаете только соответствующие столбцы в правильном порядке.

 cols <- colnames(modCoef)
modelDenorm <- mapply(denormalize, modCoef[cols], data[cols])