adding the hexbin figure

nmouquet · Nov 22, 2023 · 0c0e6a4 · 0c0e6a4
1 parent a3e81c1
commit 0c0e6a4
Show file tree

Hide file tree

Showing 6 changed files with 5 additions and 2 deletions.
diff --git a/analysis/05_assemble_knowInt/assemble_knoint.R b/analysis/05_assemble_knowInt/assemble_knoint.R
@@ -577,8 +577,11 @@ identifyPch <- function(x, y = NULL, n = length(x), plot = FALSE, pch = 19, ...)
           #r=0.65 p<0.001
 
         ###hexbin plot produced for reviewer #2
-          #hbin <- hexbin::hexbin(final_table$acad,final_table$public, xbins = 40)
-          #hexbin::plot(hbin)
+          hbin <- hexbin::hexbin(final_table$acad,final_table$public, xbins = 40)
+          hexbin::plot(hbin,xlab="Research effort", ylab="Public attention")
+          grobs <- grid::grid.grab()
+          str(grobs)
+          ggsave(here::here("tables_figures","hexbin.tiff"),device="tiff",grobs,width = 18, height = 12, units = "cm",dpi=300)
 
 #----
 

diff --git a/tables_figures/FIG_S1_text.tiff b/tables_figures/FIG_S1_text.tiff
diff --git a/tables_figures/fig2a_text.tiff b/tables_figures/fig2a_text.tiff
diff --git a/tables_figures/figS2a_text.tiff b/tables_figures/figS2a_text.tiff
diff --git a/tables_figures/figS2b_text.tiff b/tables_figures/figS2b_text.tiff
diff --git a/tables_figures/hexbin.tiff b/tables_figures/hexbin.tiff