A106778 Primes with digit sum = 47.

389999, 399899, 399989, 489989, 497999, 498989, 499979, 578999, 587999, 589997, 597899, 598799, 599699, 659999, 668999, 669989, 678989, 688799, 688889, 688979, 689699, 689789, 689879, 689987, 695999, 696989, 697979, 769799, 769997, 777989

Offset

1,1

Comments

All terms = 11 mod 18.

Links

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

Maple

select(n -> isprime(n) and convert(convert(n, base, 10), `+`) = 47, [seq(18*n+11, n=10^4 .. 10^5)]); # Robert Israel, Jul 09 2014

Mathematica

Select[Prime[Range[90000]], Total[IntegerDigits[#]]==47 &] (* Vincenzo Librandi, Jul 09 2014 *)

Prog

(Magma) [p: p in PrimesUpTo(800000) | &+Intseq(p) eq 47]; // Vincenzo Librandi, Jul 09 2014

Crossrefs

Cf. similar sequences listed in A244918.

Sequence in context: A157739 A233491 A319505 * A164987 A176765 A290499

Adjacent sequences: A106775 A106776 A106777 * A106779 A106780 A106781

Keyword

nonn,base

Author

Zak Seidov, May 16 2005

Status

approved