изменить оба названия легенды в ggplot с двумя легендами

У меня есть две легенды на моем ggplot с двумя разными названиями легенд (автоматически создаются из ggplot()). Теперь я хочу изменить названия легенды. + labs(colour = "legend name") изменить только второй заголовок легенды. Как я могу изменить и первый?

Образец данных:

dataset <- structure(list(date = structure(c(1264572000, 1266202800, 1277362800), 
class = c("POSIXt", "POSIXct"), tzone = ""), 
x1 = c(-0.00183760994446658, 0.00089738603087497, 0.000423513598318936), 
x2 = c("approach x","approach y","approach z"), 
x3 = c("Type1", "Type1", "Type2")) ,
.Names = c("date", "data","code","type"),
row.names = c("1", "2", "3"), class = "data.frame")

Вот мой код для создания сюжета:

p <- ggplot(dataset, aes(x=date, y=data)) +
geom_point(aes(shape = factor(type), color = code)) +
scale_shape_manual(value=c(23,15))
print(p)

Заголовки легенды по умолчанию: "коэффициент (тип)" и "код": введите описание изображения здесь


person Atticus    schedule 02.08.2011    source источник
comment
Вы не предоставляете образцы данных, в результате чего получается невоспроизводимый код. Вам будет намного легче помочь, если вы предоставите образцы данных и кода, которые мы сможем воспроизвести.   -  person Andrie    schedule 02.08.2011


Ответы (2)


Вот пример использования набора данных iris:

data(iris)
ggplot(iris, aes(x=Sepal.Length, y=Sepal.Width)) +
    geom_point(aes(shape=Species, colour=Petal.Width)) + 
    scale_colour_gradient() +
    labs(shape="Species label", colour="Petal width label")

Вы указываете метки с помощью labs(), причем каждая шкала указывается отдельно, то есть labs(shape="Species label", colour="Petal width label").

введите описание изображения здесь

person Andrie    schedule 02.08.2011
comment
Вы также можете указать лаборатории через scale () ggplot (iris, aes (x = Sepal.Length, y = Sepal.Width)) + geom_point (aes (shape = Species, color = Petal.Width)) + scale_colour_gradient (Petal метка ширины) + scale_shape (метка вида) - person Thierry; 02.08.2011
comment
Спасибо, все работает. У меня есть еще вопрос: у меня много записей в коде (см. Мой пример), поэтому на графике много цветов. Теперь, например, я хочу, чтобы цвет приближался к z черному, а другой оставил без изменений (они окрашиваются автоматически). Для этого не работает следующий код: + scale_colour_manual(values = c("approach z" = "black")) - person Atticus; 02.08.2011
comment
@pmuench Посмотрите примеры в документации для scale_manual по адресу had.co.nz/ggplot2/ scale_manual.html - person Andrie; 02.08.2011
comment
@Andrie У меня есть, но они заменяют все цвета. Я хочу заменить только один, а другой (автоматически раскрашенный) оставить без изменений. - person Atticus; 02.08.2011
comment
Этот вопрос задавался раньше: stackoverflow.com/questions/6075140/ - person Andrie; 02.08.2011
comment
Спасибо за этот ответ @Andrie, есть ли способ изменить текстовые метки легенды во второй легенде? Я могу изменить название, но я бы хотел изменить названия ярлыков (например, setosa и versicolor в вашем примере выше) - person jl748795; 17.06.2021

Если я правильно понял вашу точку зрения, вы можете просто использовать + labs(shape = "shape legend title", colour = "colour legend title")

person Jean-Robert    schedule 02.08.2011