A106754 Primes p with digital sum equal to 11.
29, 47, 83, 137, 173, 191, 227, 263, 281, 317, 353, 443, 461, 641, 821, 911, 1019, 1091, 1109, 1163, 1181, 1217, 1307, 1361, 1433, 1451, 1523, 1613, 1721, 1811, 1901, 2027, 2063, 2081, 2153, 2207, 2243, 2333, 2351, 2423, 2441, 2531, 2621, 2711, 2801, 3251
Offset: 1
Links
- Alois P. Heinz, Table of n, a(n) for n = 1..41771 (first 2000 terms from Vincenzo Librandi)
Crossrefs
Programs
-
Magma
[p: p in PrimesUpTo(10000) | &+Intseq(p) eq 11]; // Vincenzo Librandi, Jul 08 2014
-
Mathematica
Select[Prime[Range[100000]], Total[IntegerDigits[#]]==11 &] (* Vincenzo Librandi, Jul 08 2014 *)
-
PARI
select( {is_A106754(n)=sumdigits(n)==11&&isprime(n)}, primes([1, 3333])) \\ M. F. Hasler, Mar 09 2022
Formula
Intersection of A000040 (primes) and A166311 (digit sum = 11), also equals { p in A000040 | A007953(p) = 11 }. - M. F. Hasler, Mar 09 2022
Comments