如何对神经网络中数据集中的特定列进行反规范化

Question

我是R编程的新手。

我使用以下代码对我的数据集中选定的三个变量列进行了标准化处理;

normalize <- function(x) {
  return ((x - min(x)) / (max(x) - min(x)))
}
norm_exchangenew <- as.data.frame(lapply(exchangenew_random[3:6], normalize))

类似地应用以下内容来对相同列进行反规范化。

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

Tommorow_pred <- denormalize(predicted_Tommorow, Tommorow_min, Tommorow_max)
Tommorow_pred 

但结果表包含所有值＆＃34; NA＆＃34; 。如何对先前选择的变量列（整数）进行反规范化？请注意，列中包含字符串和整数值。

我使用的数据可以找到here

任何建议都会非常有用。