Commit aa182a42 authored by Kosmas Hench's avatar Kosmas Hench
Browse files

pre submission

parent 9aee6225

3_figures/F_scripts/Rplots.pdf

0 → 100644
+3.53 KiB

File added.

No diff preview for this file type.

View file

3_figures/F_scripts/S05.R

+3 −3
Original line number Diff line number Diff line
@@ -114,11 +114,11 @@ p2 <- ggplot(testdat,aes(x=sample,y=gene,fill=counts))+ 
  viridis::scale_fill_viridis(name="Expression: ",option = 'C',

                              guide = guide_colorbar(direction = "horizontal",title.position = "top"))+

  scale_color_manual(name="",values=c('#fb8620','#d93327','#1b519c','#666666'),guide=F)+

  theme_minimal(base_size = 7)+

  theme_minimal(base_size = 8)+

  theme(axis.text.x = element_text(angle=90),

        plot.margin = unit(c(1,1,50,1),'pt'),

        axis.text.y =  element_text(face = 'italic'),

        legend.position = c(.05,-.28),panel.grid = element_blank(),legend.key.width = unit(20,'pt'))

        legend.position = c(.02,-.4),panel.grid = element_blank(),legend.key.width = unit(20,'pt'))



legGrob <- gTree(children=gList(pictureGrob(readPicture("../../0_data/0_img/legend-expression-cairo.svg"))))
@@ -150,7 +150,7 @@ p3 <- ggplot(Cdf3,aes(x=0,y=Count))+ 
  scale_y_continuous(expression(Count~(italic(rld(n)))),expand=c(0,0))+

  scale_fill_manual('Gene',values = c('lightgray',viridis::viridis(9)),

                    labels=Flab)+

  theme_minimal(base_size = 7)+

  theme_minimal(base_size = 8)+

  theme(legend.position = 'none',

        axis.text.x = element_text(angle=90))

3_figures/F_scripts/S12.R

+1 −1
Original line number Diff line number Diff line
@@ -180,7 +180,7 @@ S12c <- ggplot(data_both,aes(x=RHO,y=WEIGHTED_FST))+ 
  annotate(geom = 'text',x=c(795),y=c(.55),label=an3,size=3,parse=TRUE,col=modclr)+

  annotate(geom = 'text',x=c(745),y=c(.5),label=an1,size=3)+

  annotate(geom = 'text',x=c(865),y=c(.5),label=c(an2),parse=TRUE,size=3)+

  scale_x_continuous(name=expression(Recombination~rate~(italic("\u03C1"))),

  scale_x_continuous(name=expression(Population~recombination~rate~(italic("\u03C1"))),

                     expand = c(.01,.01))+

  scale_y_continuous(name=expression(Genetic~differentiation~(weighted~mean~italic(F[ST]))),

                     expand = c(.005,.005))+

3_figures/S01/circos-cairo.svg

deleted100644 → 0
+0 −2907

File deleted.

File size exceeds preview limit.

View file

3_figures/S01/circos.svg

deleted100644 → 0
+0 −706

File deleted.

File size exceeds preview limit.

View file