Как изменить цвет диаграммы рассеяния в ggplot2

Ответ 1

Вот небольшой набор данных:

dat <- data.frame(x=1:20,
                  y=rnorm(20,0,10),
                  v=20:1)

Предположим, я хочу, чтобы мои точки были раскрашены с использованием значения v. Я могу изменить способ раскраски с помощью функции scale_colour_gradient().

library(ggplot2)
qplot(x,y,data=dat,colour=color,size=4) + 
  scale_colour_gradient(low="black", high="white")

Этот пример должен просто начать. Для получения дополнительной информации проверьте scale_brewer() упомянутый в другом посте.

Ответ 2

проверить документацию ggplot для scale_brewer http://www.had.co.nz/ggplot2/scale_brewer.html

несколько примеров:

#see available pallets:

library(RColorBrewer)
display.brewer.all(5)

#scatter plot
dsamp <- diamonds[sample(nrow(diamonds), 1000), ] 
d <- qplot(carat, price, data=dsamp, colour=clarity)
dev.new()
d
dev.new()
d + scale_colour_brewer(palette="Set1")
dev.new()
d + scale_colour_brewer(palette="Blues")

Ответ 3

Если ваши данные имеют отдельные категории, которые вы хотите раскрасить, ваша задача немного проще. Например, если ваши данные выглядят так: каждая строка, представляющая транзакцию,

> d <- data.frame(customer = sample(letters[1:5], size = 20, replace = TRUE),
>                sales = rnorm(20, 8000, 2000),
>                profit = rnorm(20, 40, 15))
> head(d,6)
customer    sales   profit
        a 8414.617 15.33714
        a 8759.878 61.54778
        e 8737.289 56.85504
        d 9516.348 24.60046
        c 8693.642 67.23576
        e 7291.325 26.12234

и вы хотите сделать диаграмму разброса транзакций, окрашенную клиентом, тогда вы можете сделать это

p <- ggplot(d, aes(sales,profit))
p + geom_point(aes(colour = customer))

чтобы получить....