How change the legend name position in ggplot2?

[M_AcostaCH]

Hi comunity

Im want move the lengend name of the top the legend, but I dont know how to make this.

Maybe with legend.position is possible.

library(tidyverse)
# Example data
data <- data.frame(x = 1:3,                     
                   y = 1:3,
                   group = LETTERS[1:3])

ggplot(data, aes(x, y, color = group)) +    
  geom_point() +
  scale_color_manual(values = c("#E41A1C", "#377EBA", "#4BAD4A"), name='')+ # Im change name
  theme(legend.position = "bottom")+
  labs(x='')

The idea is put the legend name in this red square.

Tnks!

[Comede_way]

Hi, @M_AcostaCH , you could use theme(legend.margin=margin(-10, 0, 0, 0)) .Follwing is the comparison.

library(tidyverse)
# Example data
data <- data.frame(x = 1:3,                     
                   y = 1:3,
                   group = LETTERS[1:3])

ggplot(data, aes(x, y, color = group)) +    
  geom_point() +
  scale_color_manual(values = c("#E41A1C", "#377EBA", "#4BAD4A"), name='')+ # Im change name
  theme(legend.position = "bottom")+
  labs(x='')+
  theme(legend.margin=margin(-10, 0, 0, 0)) 

^{Created on 2023-06-06 with reprex v2.0.2}

[M_AcostaCH]

Hi @Comede_way , tnks!

But the idea is put the legend name in the top of legend attributes. Because de legend tittle is show in a left of this attributes.

[Comede_way]

Hi, @M_AcostaCH , it is you want,use label.position?

library(tidyverse)
# Example data
data <- data.frame(x = 1:3,                     
                   y = 1:3,
                   group = LETTERS[1:3])

p1<-ggplot(data, aes(x, y, color = group)) +    
  geom_point() +
  scale_color_manual(values = c("#E41A1C", "#377EBA", "#4BAD4A"), name='')+ # Im change name
  theme(legend.position = "bottom")+
  labs(x='')
p1

p2<-p1+guides(col = guide_legend(label.position = "top"))+guides(fill = guide_legend(title = NULL))+theme(legend.margin=margin(-10, 0, 0, 0)) 
p2

^{Created on 2023-06-08 with reprex v2.0.2}

Or this? use tiltle.position

library(tidyverse)
# Example data
data <- data.frame(x = 1:3,                     
                   y = 1:3,
                   group = LETTERS[1:3])

p1<-ggplot(data, aes(x, y, color = group)) +    
  geom_point() +
  scale_color_manual(values = c("#E41A1C", "#377EBA", "#4BAD4A"), name='legen')+ # Im change name
  theme(legend.position = "bottom")+
  labs(x='')
p1

p2<-p1+guides(col = guide_legend(title.position = "top",title.hjust =0.5)) 
p2

The legend name you talk refer to "legend title"?

I mainly refer to the following link about legend guide.
Legend guide — guide_legend • ggplot2 (tidyverse.org)

[M_AcostaCH]

@Comede_way the best solution was with legend title section.
Tnks!

[Jaxson]

In ggplot2, you can change the position of the legend title using the theme() function and the legend.title argument. Here's an example of how you can adjust the legend title tiktok watermark remover position:

library(ggplot2)

Create a sample plot

p <- ggplot(data = iris, aes(x = Sepal.Width, y = Sepal.Length, color = Species)) +
geom_point()

Adjust the legend title position

p + theme(legend.title = element_text(hjust = 0.5, vjust = -0.5))

In the above code, the `theme()` function is used to modify the appearance of the plot. The `legend.title` argument is set to `element_text()` to specify the properties of the legend title. The `hjust` parameter controls the horizontal alignment of the legend title, where 0.5 represents center alignment. The `vjust` parameter controls the vertical alignment of the legend title, where negative values move the title upward.

Feel free to adjust the `hjust` and `vjust` values according to your specific needs to change the legend title position in ggplot2.