R/tileset.R

In vdweijer/games: Functions for word games.

# Tile composition, values and counts, by language
tiles.list=list(
   dutch=list(
      tiles=c(letters,"?"),
      values=c(1,4,5,2,1,4,3,4,2,4,3,3,3,1,1,4,10,2,2,2,2,4,5,8,8,5,0),
      counts=c(7,2,2,5,18,2,3,2,4,2,3,3,3,11,6,2,1,5,5,5,3,2,2,1,1,2,2)),
   english=list(
      tiles=c(letters,"?"),
      values=c(1,3,3,2,1,4,2,4,1,8,5,1,3,1,1,3,10,1,1,1,1,4,4,8,4,10,0),
      counts=c(10,2,2,5,12,2,3,3,9,1,1,4,2,6,7,2,1,6,5,7,4,2,2,1,2,1,2)),
   swedish=list(
      tiles=c(letters[-c(17,23)],"å","ä","ö","?"),
      values=c(1,3,8,1,1,3,2,3,1,7,3,2,3,1,2,4,1,1,1,4,3,8,7,8,4,4,4,0),
      counts=c(9,2,1,5,8,2,3,2,5,1,3,5,3,6,6,2,8,8,9,3,2,1,1,1,2,2,2,2))
   )