login
A106787
Primes with digit sum = 61.
9
8989999, 8999899, 9989899, 9999889, 16999999, 17989999, 17999899, 18889999, 18899899, 18899989, 18979999, 18989899, 18998899, 18999889, 18999979, 18999997, 19889899, 19899889, 19979899, 19987999, 19988989, 19989997, 19999789, 19999897, 26998999, 27799999
OFFSET
1,1
LINKS
MATHEMATICA
Select[Prime[Range[3000000]], Total[IntegerDigits[#]]==61 &] (* Vincenzo Librandi, Jul 09 2014 *)
PROG
(PARI) isok(n) = isprime(n) && (sumdigits(n) == 61); \\ Michel Marcus, Oct 09 2013
(Magma) [p: p in PrimesUpTo(30000000) | &+Intseq(p) eq 61]; // Vincenzo Librandi, Jul 09 2014
CROSSREFS
Cf, similar sequences listed in A244918.
Sequence in context: A162021 A157815 A157821 * A105012 A186139 A335581
KEYWORD
nonn,base
AUTHOR
Zak Seidov, May 16 2005
EXTENSIONS
More terms from Joshua Zucker, May 17 2006
More terms from Michel Marcus, Oct 05 2013
STATUS
approved