ggplot2 d'augmenter l'espace entre les touches de légende

Comment puis-je augmenter l'espace entre les touches de la légende de ggplot2 intrigue?

library(ggplot2)
ggplot(aes(mpg, wt, colour = factor(cyl)),
       , data = mtcars) +
      geom_point() +
  theme(legend.direction = "horizontal", 
        legend.position = "bottom") +
  guides(color = guide_legend(nrow=2))

Je suis à la recherche d'un ggplot2 option ajouter un type de réglage vertical entre (touche 4 et la touche 6) dans le graphique ci-dessus? Dois-je créer un symbole de légende?

PS: je veux augmenter l'espace entre les cases ne sont pas entre les étiquettes.

le tracé souhaité est :

ggplot2 d'augmenter l'espace entre les touches de légende

REMARQUE: Pas la question n'est pas dupliquée de la question. Nous voulons ici pour ajouter un espacement vertical entre les éléments qui sont déjà dans plusieurs lignes. Dans l'autre question que nous avons à 1 rangée de légende et nous voulons ajouter des espaces (à l'horizontale) entre les éléments.

Double Possible de this. N'a qu'à résoudre votre problème?
pas de.il n'est pas un doublon.Je ne veux pas changer la taille de la clé. l'espace entre les touches. Vous pouvez essayer la solution dans le lien pour vérifier cela.
grid ou gridExtra peut aider, je n'ai jamais utilisé autant... Le gridExtra vignette semble assez prometteur, mais qui est loin de nous donner une solution claire.

InformationsquelleAutor agstudy | 2015-08-28

ggplot2 r

52

Une alternative (et probablement plus facile) solution est d'utiliser legend.key et legend.key.size dans le theme partie de votre code:
```
ggplot(data = mtcars, aes(mpg, wt, colour = factor(cyl))) +
  geom_point() +
  guides(color = guide_legend(nrow = 2)) +
  theme(legend.direction = 'horizontal', 
        legend.position = 'bottom',
        legend.key = element_rect(size = 5),
        legend.key.size = unit(1.5, 'lines'))
```
cela donne:

Dans le cas où vous appelez theme_bw ou theme_classic avant de manipuler la légende, vous devez définir la couleur de la légende rectangle:
```
legend.key = element_rect(size = 5, color = 'white') #or: color = NA
```
- Pourriez-vous expliquer la différence entre la taille de la propriété de legend.key et la lines propriété de legend.key.size. Qui l'on contrôle l'espacement entre les touches (c'est à dire, les cases grises + l'étiquette)?
- Le size paramètre de legend.key détermine la taille de la ligne de démarcation. Le lines propriété de legend.key.size détermine la taille de l'ensemble de la zone.
- Ce n'est pas de résoudre ma situation, parce que le lines fait quelques symboles de légende augmenter avec la boîte. Dans ma situation, le symbole de point n'a pas augmenté (comme ton exemple), mais le symbole de ligne fait. Comme mes lignes étaient verticales, la boîte devenait de plus grand que lines a été augmenté, sans augmenter l'espace entre les deux colonnes de la légende. Présentera un rapport si je trouve une solution.
- Pas sûr de ce que votre problème est. Peut-être poster une nouvelle question?
- Le problème est venu à la mords-moi encore et je ne me souviens pas si j'avais résolu la dernière fois (voir mon commentaire sur 30 septembre 2017), donc je l'ai posté une question: stackoverflow.com/questions/49668265/...
- href="https://github.com/tidyverse/ggplot2/issues/3180" >Notez que cette solution ne fonctionne pas pour légende verticale w/ ggplot2 > v3.0.0
- Thx pour la notification. Dois-je comprendre que la question de droit qu'il n'y a pas moyen de faire ça? Vais essayer de le regarder plus tard.
- Malheureusement pas. Vous aurez à modifier ggplot code si vous souhaitez modifier l'espacement vertical
InformationsquelleAutor Jaap

Ici une solution à l'aide de gtable. Fondamentalement, je suis de l'extraction de la légende grobs table et j'ai ajouter une ligne dans la légende de la table.

library(gtable)
library(grid)
## transform the ggplot to a grobs table
p_table <- ggplot_gtable(ggplot_build(p))
## extract legend
leg <- which(sapply(p_table$grobs, function(x) x$name) == "guide-box")
## this is the tricky part !
## add  a row in the second position (pos=2)
p_table$grobs[[leg]]$grobs[[1]] <- 
  gtable_add_rows(p_table$grobs[[leg]]$grobs[[1]], 
                  unit(0.5, "line"), ## you can increase the height here
                  pos=2)             ## since I have 2 rows , I insert it in the middle
plot(p_table)

PS: je ne sais comment faire pour forcer la table pour une parcelle de nouveau! peut-être quelqu'un d'autre peut vous aider ici ( je suis juste de traçage et de perdre la structure de l'objet)

ggplot2 d'augmenter l'espace entre les touches de légende

InformationsquelleAutor agstudy

Vous devez vous connecter pour publier un commentaire.