diff --git a/createfigs.R b/createfigs.R index 68625f9..182efb4 100644 --- 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 new file mode 100644 index 0000000..722725e Binary files /dev/null and b/figures/tbnireportnotxt.jpg differ