A158342 List of twin primes p1 and p2 with odd sum of digits of p1 and even sum of digits of p2.
29, 31, 179, 181, 269, 271, 809, 811, 1019, 1021, 1619, 1621, 1949, 1951, 2339, 2341, 2999, 3001, 3329, 3331, 3389, 3391, 3929, 3931, 4049, 4051, 4229, 4231, 4649, 4651, 5279, 5281, 5639, 5641, 5879, 5881, 6089, 6091, 6269, 6271, 6359, 6361, 6449, 6451
Offset: 1
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..3000
Crossrefs
Cf. A077800.
Programs
-
Mathematica
Select[Partition[Prime[Range[1000]],2,1],#[[2]]-#[[1]]==2&&OddQ[Total[IntegerDigits[#[[1]]]]]&&EvenQ[Total[IntegerDigits[#[[2]]]]]&]//Flatten (* Harvey P. Dale, Jan 19 2025 *)
Extensions
Corrected (269,271 inserted, 1229,1231 removed, 3119,3121 removed...) by R. J. Mathar, May 19 2010