我遇到了错误： FUN（x，aperm（array（STATS，dims [perm]），order（perm）），...）中的错误：二进制运算符的非数字参数
samplesize = 0.60 * nrow(data)
set.seed(80)
index = sample ( seq_len( nrow ( data )), size = samplesize)
datatrain = data[index, ]
dataset = data[ -index, ]
max = apply(data, 2, max)
min = apply(data, 2, min)
scaled = as.data.frame(scale(data, center = min, scale = max - min))
我不确定如何解决它。