A067191 Numbers that can be expressed as the sum of two primes in exactly five ways.
48, 54, 64, 70, 74, 76, 82, 86, 94, 104, 124, 136, 148, 158, 164, 188
Offset: 1
Examples
70 is a term as 70 = 67 + 3 = 59 + 11 = 53 + 17 = 47 + 23 41 + 29 are all the five ways to express 70 as a sum of two primes.
Crossrefs
Programs
-
Mathematica
upperbound=10^4; range=ConstantArray[0,2*upperbound]; primeRange=Prime[Range[PrimePi[upperbound]]]; (range[[Plus@@#]]++)&/@(DeleteDuplicates[Sort[#]&/@Tuples[primeRange,2]]);{"upperbound="<>ToString[upperbound],Flatten[Position[Take[range,upperbound],5]]} (* Hans Rudolf Widmer, Jul 06 2021 *)
Extensions
Corrected and extended by Peter Bertok (peter(AT)bertok.com), Jan 13 2002
Comments