R/latex_table.R
latex_range.Rd
Make latex notation for best value and confidence boundaries.
latex_range(best, min, max, ndigits = "auto", na = "-")
character vector
x <- c(NA,1:10, NA)
x <- x + rnorm(length(x))
err <- rnorm(length(x))
latex_range(best = x, min = x - err, max = x + err, ndigits = 2)
#> [1] "$-$" "$1.3\\pm-1.6$" "$-0.4\\pm0.5$" "$3.0\\pm-1.9$"
#> [5] "$4.6\\pm-0.5$" "$6.1\\pm-0.1$" "$4.2\\pm0.5$" "$6.8\\pm-0.9$"
#> [9] "$7.8\\pm0.5$" "$8.7\\pm0.4$" "$9.4\\pm-1.3$" "$-$"
latex_range(best = x, min = x - err, max = x + 2*err, ndigits = 2, na='')
#> [1] "$$" "$1.3_{--1.6}^{+-3.3}$" "$-0.4_{-0.5}^{+1.0}$"
#> [4] "$3.0_{--1.9}^{+-3.7}$" "$4.6_{--0.5}^{+-1.0}$" "$6.1_{--0.1}^{+-0.1}$"
#> [7] "$4.2_{-0.5}^{+1.1}$" "$6.8_{--0.9}^{+-1.8}$" "$7.8_{-0.5}^{+0.9}$"
#> [10] "$8.7_{-0.4}^{+0.7}$" "$9.4_{--1.3}^{+-2.6}$" "$$"