login
A023734
Numbers with a single 3 in their base-5 expansion.
4
3, 8, 13, 15, 16, 17, 19, 23, 28, 33, 38, 40, 41, 42, 44, 48, 53, 58, 63, 65, 66, 67, 69, 73, 75, 76, 77, 79, 80, 81, 82, 84, 85, 86, 87, 89, 95, 96, 97, 99, 103, 108, 113, 115, 116, 117, 119, 123, 128, 133, 138, 140, 141, 142, 144, 148, 153, 158
OFFSET
1,1
LINKS
MAPLE
seq(`if`(numboccur(3, convert(n, base, 5))=1, n, NULL), n=0..200); # Nathaniel Johnston, Jun 27 2011
MATHEMATICA
Select[ Range[ 150 ], (Count[ IntegerDigits[ #, 5 ], 3 ]==1)& ]
CROSSREFS
Sequence in context: A310289 A310290 A043361 * A045296 A065042 A277555
KEYWORD
nonn,base,easy
STATUS
approved