R code to create scatterplot of log(snippetval/wage).