tbni report card no text

tbep-tech · Jul 17, 2024 · 93d68ed · 93d68ed
1 parent aa5a812
commit 93d68ed
Show file tree

Hide file tree

Showing 2 changed files with 11 additions and 0 deletions.
diff --git a/createfigs.R b/createfigs.R
@@ -56,6 +56,7 @@ dev.off()
 
 tbniscr <- anlz_tbniscr(fimdata)
 
+# w/ text
 p <- show_tbnimatrix(tbniscr, family = fml) +
   theme(
     text = element_text(family = fml),
@@ -65,6 +66,16 @@ jpeg('figures/tbnireport.jpg', family = fml, height = 6, width = 3, units = 'in'
 print(p)
 dev.off()
 
+# w/o text
+p <- show_tbnimatrix(tbniscr, family = fml, txtsz = NULL) +
+  theme(
+    text = element_text(family = fml),
+    axis.text.y = element_text(family = fml)
+  )
+jpeg('figures/tbnireportnotxt.jpg', family = fml, height = 6, width = 3, units = 'in', res = 300)
+print(p)
+dev.off()
+
 # tbni report card detailed -------------------------------------------------------------------
 
 tbniscr <- anlz_tbniscr(fimdata)

diff --git a/figures/tbnireportnotxt.jpg b/figures/tbnireportnotxt.jpg