A319809 Numbers k that are equal to 2*k when expressed in base 9 and then interpreted in base 10.

7794416, 7816758, 8131871, 8132006, 8152638, 8152650

Offset

1,1

Links

Table of n, a(n) for n=1..6.

Example

8132006 expressed in base 9 is equal to 16264012; 16264012 = 2*8132006.

Mathematica

Select[Range[10^6, 10^7], FromDigits@ IntegerDigits[#, 9] == 2 # &] (* Michael De Vlieger, Oct 11 2018 *)

Prog

(PARI) isok(n) = fromdigits(digits(n, 9), 10) == 2*n; \\ Michel Marcus, Sep 28 2018

Crossrefs

Cf. A139285.

Sequence in context: A273101 A124416 A320516 * A347424 A214194 A205657

Adjacent sequences: A319806 A319807 A319808 * A319810 A319811 A319812

Keyword

nonn,base,fini,full

Author

Anton Deynega, Sep 28 2018

Status

approved