Я пытаюсь создать парный график из 6 переменных данных, используя ggplot2, и раскрасить точки в соответствии с кластером k-средних, к которому они принадлежат. Я прочитал документацию очень впечатляющего «GGally» пакет, а также неофициальное исправление Адама Лаякано [http://adamlaiacano.tumblr.com/post/13501402316/colored-plotmatrix-in-ggplot2]. К сожалению, я не мог найти способ получить желаемый результат либо.

Вот пример кода: -

#The Swiss fertility dataset has been used here

data_ <- read.csv("/home/tejaskale/Ubuntu\ One/IUCAA/Datasets/swiss.csv", header=TRUE)
data_ <- na.omit(data_)

u <- c(2, 3, 4, 5, 6, 7)
x <- data_[,u]
k <- 3
maxIterations <- 100
noOfStarts <- 100
filename <- 'swiss.csv'

library(ggplot2)
library(gridExtra)
library(GGally)

kmeansOutput <- kmeans(x, k, maxIterations, noOfStarts)

xNew <- cbind(x[,1:6], as.factor(kmeansOutput$cluster))
names(xNew)[7] <- 'cluster'
kmeansPlot <- ggpairs(xNew[,1:6], color=xNew$cluster)

OR

kmeansPlot <- plotmatrix(xNew[,1:6], mapping=aes(colour=xNew$cluster))

Оба графика созданы, но не окрашены в соответствии с кластерами.

Надеюсь, я не пропустил ответ на этот вопрос на форуме и прошу прощения, если это действительно так. Любая помощь будет высоко оценен.

Спасибо!