login
A023736
Numbers with exactly 3 3's in their base-5 expansion.
2
93, 218, 343, 393, 418, 443, 453, 458, 463, 465, 466, 467, 469, 473, 493, 593, 718, 843, 968, 1018, 1043, 1068, 1078, 1083, 1088, 1090, 1091, 1092, 1094, 1098, 1118, 1218, 1343, 1468, 1593, 1643, 1668, 1693, 1703, 1708
OFFSET
1,1
LINKS
MAPLE
seq(`if`(numboccur(3, convert(n, base, 5))=3, n, NULL), n=0..2000); # Nathaniel Johnston, Jun 27 2011
MATHEMATICA
Select[ Range[ 1750 ], (Count[ IntegerDigits[ #, 5 ], 3 ]==3)& ]
CROSSREFS
KEYWORD
nonn,base,easy
STATUS
approved