Hello List,
while dealing with a questin of 'xiaodao' (
http://r.789695.n4.nabble.com/Problem-with-large-small-numbers-in-knitr-tp4653986.html)
I noticed that copying the default inline hook function obtained by
knit_hooks$get("inline")
into a knit_hook$set(inline = <...>) call turns off exponential
fomatting in the resulting .tex file.
I used a stripped version of 'xiaodao's example:
\documentclass{article}
\begin{document}
<<>>=
a<-1e-13
b<-2.5e-10
ssrr<-123456.12
ssru<-123400.00
@
$
c=\Sexpr{a}/\Sexpr{b}
f=\Sexpr{ssrr-ssru}/\Sexpr{ssru}
$
\end{document}
so:
knit_hooks$restore()
knit_hooks$get("inline")
## yields:
## function (x)
## {
## if (is.numeric(x))
## x = round(x, getOption("digits"))
## paste(as.character(x), collapse = ", ")
## }
## <environment: namespace:knitr>
knit("FILENAME.Rnw")
## .tex-file:
## c=$10^{-13}$/$2.5\times 10^{-10}$
## f=56.12/$1.234\times 10^{5}$
## then run knit_hooks$set() with exactly the same function:
knit_hooks$set(inline= function (x)
{
if (is.numeric(x))
x = round(x, getOption("digits"))
paste(as.character(x), collapse = ", ")
}
)
knit("FILENAME.Rnw")
## .tex-File
## c=0/0
## f=56.12/123400
knit_hooks$get("inline")
## function (x)
## {
## if (is.numeric(x))
## x = round(x, getOption("digits"))
## paste(as.character(x), collapse = ", ")
## }
The only thing that changed is no <environment: namespace:knitr> is
printed anymore
Why does knitr change its output?
Regards, Moritz
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
