Положение названия легенды с использованием лоскутного шитья?

Question

Я выложил 2 графика, используя лоскутное одеяло, и у меня есть легенда, которая описывает их оба внизу. Легенда имеет горизонтальную ориентацию, и я пытаюсь переместить заголовок вверх, а не слева по умолчанию. Когда я использую

guides(
fill = guide_legend(title.position = "top")
) 

(непрерывная) легенда преобразуется в дискретную легенду. Есть ли простой способ предотвратить это?

Answer 1

В ggplot, а guide_legendподразумевает, что вам нужны дискретные ключи легенды. Я думаю ты ищешьguide_colorbar.

Чтобы продемонстрировать, давайте воссоздадим вашу проблему. Во-первых, оригинальный сюжет:

library(ggplot2)

set.seed(69)
df <- data.frame(x = 1:10, y = sample(10), z = 1:10)

p <- ggplot(df, aes(x, y, fill = z)) + 
      geom_col() + 
      theme(legend.position = "bottom")

p

Теперь код, который вы используете, вызывает проблему:

p + guides(fill = guide_legend(title.position = "top"))

И код, который это разрешает:

p + guides(fill = guide_colorbar(title.position = "top"))

^{Создано 07.08.2020 с помощью пакета REPEX (v0.3.0)}