Commit 24f7697f authored by Kosmas Hench's avatar Kosmas Hench
Browse files

Figgure one corrected

parent 489dd18f

3_figures/F1.Rmd

+1 −1
Original line number Diff line number Diff line
@@ -196,7 +196,7 @@ fstdata <- read.csv('../../2_output/08_popGen/05_fst/genome_wide_weighted_mean_f 
         pairclass=paste(pop1,pop2,sep='-'))



# defining the pairwise color palette

clrP <- c('#fb8620','#1b519c','#d93327')

clrP <- c('#1b519c','#fb8620','#d93327')

```



And than generate the bar plot:

3_figures/F_scripts/F1.R

+1 −1
Original line number Diff line number Diff line
@@ -92,7 +92,7 @@ fstdata <- read.csv('../../2_output/08_popGen/05_fst/genome_wide_weighted_mean_f 
         pop1 = substr(as.character(pair),1,1),

         pop2 = substr(as.character(pair),3,3),

         pairclass=paste(pop1,pop2,sep='-'))

clrP <- c('#fb8620','#1b519c','#d93327')

clrP <- c('#1b519c','#fb8620','#d93327')



p5 <- ggplot(fstdata,aes(x=x,y=fst,fill=pairclass))+

  geom_bar(stat='identity')+

3_figures/F_scripts/Rplots.pdf

0 → 100644
+3.53 KiB

File added.

No diff preview for this file type.

View file

3_figures/output/F1.eps

deleted100644 → 0
+0 −76587

File deleted.

Preview size limit exceeded, changes collapsed.

3_figures/output/F1.pdf

(916 KiB)

File changed.

No diff preview for this file type.

View original file
View changed file