R/wordfeud_scatterplot.R

In vdweijer/games: Functions for word games.

# Relation between number of tiles and score
# The more tiles you use, the higher the score
wordfeud_scatterplot=function(){ggplot(data.frame(x=tapply(nchar(wf$used),wf$start,sum),
                  y=tapply(wf$points,wf$start,sum)),
                  aes(x=x,y=y,col=y)) + geom_point() +xlab("Number of tiles") + ylab("Total score") + 
   geom_vline(aes(xintercept=52))}