edit ms

analysis/paper/paper.Rmd

@@ -30,7 +30,7 @@ output:
       - --lua-filter=../templates/author-info-blocks.lua
       - --lua-filter=../templates/pagebreak.lua
 bibliography: references.bib
-csl: "../templates/journal-of-archaeological-science.csl" # Insert path for the bib-style
+csl: "../templates/vancouver.csl" # Insert path for the bib-style
 abstract: |
   Text of abstract
 keywords: |
@@ -814,7 +814,7 @@ a = df_all %>%
   labs(x="Minimum energy requirement (GJ/aeu)", y="max inequality (10:10 ratio)")+
   theme(text=element_text(family="Liberation Sans Narrow"))# +
   #theme_ipsum()
-a
+
 ggsave(here("analysis", "figures", "figure5-test.pdf"))
 ```