rmd_to_token_count function

Count tokens in R/Rmd