|
|
A106780
|
|
Primes with digit sum = 50.
|
|
4
|
|
|
599999, 788999, 799979, 888989, 889997, 897899, 898889, 969989, 979889, 988979, 996899, 997889, 998897, 998969, 999599, 999959, 1598999, 1699799, 1789979, 1798997, 1799969, 1859999, 1886999, 1888979, 1889969, 1896899, 1896989, 1897979, 1899797
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Prime[Range[190000]], Total[IntegerDigits[#]]==50 &] (* Vincenzo Librandi, Jul 09 2014 *)
|
|
PROG
|
(Magma) [p: p in PrimesUpTo(1900000) | &+Intseq(p) eq 50]; // Vincenzo Librandi, Jul 09 2014
|
|
CROSSREFS
|
Cf. similar sequences listed in A244918.
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|