R syntax highlighting test 2