login
A106777
Primes with digit sum = 46.
3
199999, 289999, 298999, 379999, 389989, 398989, 399979, 478999, 489799, 496999, 497899, 497989, 499879, 499897, 499969, 568999, 587989, 596899, 597889, 597997, 598789, 598987, 599779, 599869, 599959, 659899, 667999, 668989, 679699, 679879
OFFSET
1,1
LINKS
MATHEMATICA
Select[Prime[Range[450000]], Total[IntegerDigits[#]]==46 &] (* Vincenzo Librandi, Jul 09 2014 *)
PROG
(Magma) [p: p in PrimesUpTo(700000) | &+Intseq(p) eq 46]; // Vincenzo Librandi, Jul 09 2014
CROSSREFS
Cf. similar sequences listed in A244918.
Sequence in context: A163500 A164321 A230019 * A094800 A200863 A380292
KEYWORD
nonn,base
AUTHOR
Zak Seidov, May 16 2005
STATUS
approved