R syntaxi highlighting attempt 3