上述代码报错Error in X - min(X) : non-numeric argument to binary operator

这个错误通常是因为 `X` 不是数值类型的数据，导致无法进行数值运算。可能是因为 `X` 中包含了字符型或其他非数值型的数据。

你可以尝试将 `X` 转换为数值型数据，例如：

X <- as.numeric(X)

或者在读取数据时，指定数据类型为数值型：

X <- read.csv("data.csv", colClasses = "numeric")

如果问题仍然存在，请检查 `X` 的数据类型，并确保其为数值型。