mirror of
https://github.com/msberends/AMR.git
synced 2024-12-27 10:46:12 +01:00
freq - print title bold in markdown
This commit is contained in:
parent
c2a93b46db
commit
9c56257da1
5
R/freq.R
5
R/freq.R
@ -543,8 +543,11 @@ print.frequency_tbl <- function(x, nmax = getOption("max.print.freq", default =
|
|||||||
|
|
||||||
title <- paste("Frequency table", title)
|
title <- paste("Frequency table", title)
|
||||||
|
|
||||||
|
# bold title
|
||||||
if (opt$tbl_format == "pandoc") {
|
if (opt$tbl_format == "pandoc") {
|
||||||
title <- bold(title) # only bold in regular printing
|
title <- bold(title)
|
||||||
|
} else if (opt$tbl_format == "markdown") {
|
||||||
|
title <- paste0("**", title, "**")
|
||||||
}
|
}
|
||||||
|
|
||||||
if (opt$header == TRUE) {
|
if (opt$header == TRUE) {
|
||||||
|
Loading…
Reference in New Issue
Block a user