A077723 Primes which can be expressed as sum of distinct powers of 9.

739, 811, 6571, 59779, 65701, 532261, 538093, 591301, 597133, 597781, 4783699, 4789621, 4842109, 4849399, 5314411, 5314501, 5373469, 5374279, 5380831, 43047541, 43112341, 43113061, 43643773, 43643863, 47837071, 47888821

Offset

1,1

Comments

Primes whose base 9 representation contains only zeros and 1's.

Links

Zak Seidov, Table of n, a(n) for n = 1..3000

Mathematica

Select[Prime[Range[3000000]], Union[Most[Rest[DigitCount[#, 9]]]]=={0}&] (* Harvey P. Dale, Jul 31 2013 *)

Prog

(PARI) lista(nn) = {forprime(p=2, nn, if (vecmax(digits(p, 9)) <= 1, print1(p, ", ")); ); } \\ Michel Marcus, Oct 10 2014

Crossrefs

Cf. A020449, A000695, A033046, A077717, A077718, A077719, A077720, A077721, A077722.

Sequence in context: A204289 A204285 A224564 * A235466 A202417 A078906

Adjacent sequences: A077720 A077721 A077722 * A077724 A077725 A077726

Keyword

nonn

Author

Amarnath Murthy, Nov 19 2002

Extensions

More terms from Sascha Kurz, Jan 03 2003

Status

approved