Olympic medals in R