A106775 Primes with digit sum = 43.
79999, 89899, 89989, 98899, 179899, 179989, 189799, 189997, 198997, 268999, 277999, 286999, 288979, 288997, 289789, 289897, 289987, 297889, 298897, 299977, 358999, 368899, 369979, 369997, 378997, 379699, 386989, 387799, 388699, 388789
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..5400
Crossrefs
Cf. similar sequences listed in A244918.
Programs
-
Magma
[p: p in PrimesUpTo(400000) | &+Intseq(p) eq 43]; // Vincenzo Librandi, Jul 09 2014
-
Mathematica
Select[Prime[Range[35000]], Total[IntegerDigits[#]]==43 &] (* Vincenzo Librandi, Jul 09 2014 *)