modifying inline latex hook to account for different decimal separato…

…rs on numeric inputs
yihui · Jul 24, 2012 · 7723b22 · 7723b22
1 parent 1769b85
commit 7723b22
Showing 1 changed file with 7 additions and 1 deletion.
diff --git a/R/hooks-latex.R b/R/hooks-latex.R
@@ -129,7 +129,13 @@ hook_plot_tex = function(x, options) {
 
 ## inline hook for tex
 .inline.hook.tex = function(x) {
-  if (is.numeric(x)) x = format_sci(x, 'latex')
+  if(is.numeric(x)) {
+    if(getOption('OutDec') != '.') {
+      if(!inherits(x, 'AsIs')) x = sprintf('\\text{%s}', format_sci(x, 'latex'))
+    } else {
+      x = format_sci(x, 'latex')
+    }
+  }
   .inline.hook(x)
 }
 # an example of a chunk hook