A037465 Sum{d(i)*6^i: i=0,1,...,m}, where Sum{d(i)*5^i: i=0,1,...,m} is the base 5 representation of n.

0, 1, 2, 3, 4, 6, 7, 8, 9, 10, 12, 13, 14, 15, 16, 18, 19, 20, 21, 22, 24, 25, 26, 27, 28, 36, 37, 38, 39, 40, 42, 43, 44, 45, 46, 48, 49, 50, 51, 52, 54, 55, 56, 57, 58, 60, 61, 62, 63, 64, 72, 73, 74, 75, 76, 78, 79, 80, 81, 82, 84, 85, 86, 87, 88, 90, 91, 92, 93

Offset

0,3

Comments

Numbers without digit 5 in base 6. Complement of A333656. - François Marques, Oct 13 2020

Links

François Marques, Table of n, a(n) for n = 0..10000 (first 1000 terms from Clark Kimberling)

Example

a(34)=46 because 34 is 114_5 in base 5 and 114_6=46. - François Marques, Oct 13 2020

Mathematica

Table[FromDigits[RealDigits[n, 5], 6], {n, 0, 100}] (* Clark Kimberling, Aug 14 2012 *)

Prog

(PARI) a(n) = fromdigits(digits(n, 5), 6); \\ François Marques, Oct 13 2020

Crossrefs

Cf. Numbers with at least one digit b-1 in base b : A074940 (b=3), A337250 (b=4), A337572 (b=5), A333656 (b=6), A337141 (b=7), A337239 (b=8), A338090 (b=9), A011539 (b=10), A095778 (b=11).

Cf. Numbers with no digit b-1 in base b: A005836 (b=3), A023717 (b=4), A020654 (b=5), this sequence (b=6), A020657 (b=7), A037474 (b=8), A037477 (b=9), A007095 (b=10), A171397 (b=11).

Sequence in context: A059537 A039259 A191610 * A157846 A285126 A187388

Adjacent sequences: A037462 A037463 A037464 * A037466 A037467 A037468

Keyword

nonn,base,easy

Author

Clark Kimberling

Extensions

Offset changed to 0 by Clark Kimberling, Aug 14 2012

Status

approved