mirror of
https://github.com/msberends/AMR.git
synced 2024-12-25 18:46:11 +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)
|
||||
|
||||
# bold title
|
||||
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) {
|
||||
|
Loading…
Reference in New Issue
Block a user