Blast it hit send by accident. Anyway the code above is a WWE.
I don't see any obvious way no move the legend
On Mon, 5 Feb 2024 at 09:13, John Kane <jrkrideau at gmail.com> wrote:
> I'm sorry but that is not a working example.
>
> A working example needs to create the plots being used.
>
> For example, stealing some code from
> https://rpkgs.datanovia.com/ggpubr/reference/ggarrange.html
> #================================================================>
> data <https://rdrr.io/r/utils/data.html>("ToothGrowth")df
<- ToothGrowthdf$dose <- as.factor
<https://rdrr.io/r/base/factor.html>(df$dose)# Box plotbxp <- ggboxplot
<https://rpkgs.datanovia.com/ggpubr/reference/ggboxplot.html>(df, x =
"dose", y = "len", color = "dose", palette =
"jco")# Density plotdens <- ggdensity
<https://rpkgs.datanovia.com/ggpubr/reference/ggdensity.html>(df, x =
"len", fill = "dose", palette = "jco")
>
> mylist<-list(bxp, dens)
>
> dev.new(width=28, height=18)
>
> fig1<- ggarrange(plotlist=mylist, common.legend = TRUE,
legend="top", labels = c("(A)", "(B)"), font.label
= list(size = 18, color = "black"), ncol=2)
>
> fig1
>
#====================================================================================>
>
> On Mon, 5 Feb 2024 at 08:44, <sibylle.stoeckli at gmx.ch> wrote:
>
>> Dear John Kane
>>
>> Dear R community
>>
>>
>>
>> Here my working example
>>
>> 1. Example that is working with legend=?top?. However, as mentioned,
>> the legend is in the middle of the top axis.
>>
>> mylist<-list(p1, p2)
>>
>> dev.new(width=28, height=18)
>>
>> fig1<- ggarrange(plotlist=mylist, common.legend = TRUE,
legend="top",
>> labels = c("(A)", "(B)"), font.label = list(size =
18, color = "black"),
>> ncol=2)
>>
>> fig1
>>
>>
>>
>> 1. My question is how I can position the legend on the topright of
>> the top axis. However, ?topright? is not a common label for legend
in
>> ggarrange (but in other plot functions), so legend =?topright? is
not
>> working.
>>
>> mylist<-list(p1, p2)
>>
>> dev.new(width=28, height=18)
>>
>> fig1<- ggarrange(plotlist=mylist, common.legend = TRUE,
>> legend="topright", labels = c("(A)",
"(B)"), font.label = list(size = 18,
>> color = "black"), ncol=2)
>>
>> fig1
>>
>>
>>
>> Kind regards
>>
>> Sibylle
>>
>>
>>
>> *From:* John Kane <jrkrideau at gmail.com>
>> *Sent:* Monday, February 5, 2024 1:59 PM
>> *To:* sibylle.stoeckli at gmx.ch
>> *Cc:* r-help at r-project.org
>> *Subject:* Re: [R] ggarrange & legend
>>
>>
>>
>> Could you supply us with a MWE (minimal working example)of what you
have
>> so far?
>>
>> Thanks.
>>
>>
>>
>> On Mon, 5 Feb 2024 at 05:00, SIBYLLE ST?CKLI via R-help <
>> r-help at r-project.org> wrote:
>>
>> Dear R community
>>
>> It is possible to adjust the legend in combined ggplots using ggarrange
>> with
>> be positions top, bottom, left and right.
>> My question: Is there a function to change the position of the legend
to
>> topright or bottomleft? Right and top etc are in the middle of the
axis.
>>
>> Kind regards
>> Sibylle
>>
>> ______________________________________________
>> R-help at r-project.org mailing list -- To UNSUBSCRIBE and more, see
>> https://stat.ethz.ch/mailman/listinfo/r-help
>> PLEASE do read the posting guide
>> http://www.R-project.org/posting-guide.html
>> and provide commented, minimal, self-contained, reproducible code.
>>
>>
>>
>> --
>>
>> John Kane
>> Kingston ON Canada
>>
>
>
> --
> John Kane
> Kingston ON Canada
>
--
John Kane
Kingston ON Canada
[[alternative HTML version deleted]]