>>10
指折り数える

> w=NULL
> for(x in 0:2){
+ for(y in 0:1){
+ for(z in 0:2){
+ w=c(w,10*x+50*y+100*z)
+ }
+ }
+ }
> unique(sort(w))
[1] 0 10 20 50 60 70 100 110 120 150 160 170 200 210 220 250 260 270
0を除くと17通り