Get template working
Improve string escaping a little
Use internal knitr function