为什么绘图对于相同但缩放的数据表现不同？

Question

为什么不同数据的情节表现不同，您如何控制它？我今天的具体例子是使用缩放和非缩放数据获得不同的输出。例如

fit <- kmeans(mydata, 4)
plot(mydata, col = fit$cluster)

返回一个漂亮的4x4散点图矩阵（mydata为486x4），但

mydata <- scale(mydata)
fit <- kmeans(mydata, 4)
plot(mydata, col = fit$cluster)

返回单个图表，显示变量1散点图与变量2？

Answer 1

这是因为scale()返回的是矩阵而不是data.frame。只需将其转换回data.frame

即可

mydata <- data.frame(scale(mydata))