A222618 Multiples of 10 that are sum of two consecutive primes.

30, 60, 90, 100, 120, 210, 240, 300, 320, 330, 340, 360, 390, 410, 450, 480, 520, 540, 600, 630, 740, 810, 840, 930, 990, 1030, 1120, 1140, 1180, 1200, 1220, 1230, 1250, 1290, 1300, 1320, 1350, 1360, 1410, 1460, 1530, 1560, 1620, 1650, 1710, 1740, 1770, 1830

Offset: 1

Author

Zak Seidov, Feb 26 2013

Keywords

• nonn

Comments

a(1) = 30 = A179975(1)*10^1

a(4) = 100 = A179975(2)*10^2

a(123) = 6000 = A179975(3)*10^3

a(925) = 60000 = A179975(4)*10^4

a(7266) = 600000 = A179975(5)*10^5

a(204645) = 14000000 = A179975(6)*10^6.

Examples

			30 = 13 + 17, 60 = 29 + 31, 90 = 47 + 53, 100 = 47 + 53.
		

Crossrefs

Intersection of A001043 and A008592.

Cf. A179975 Least k => k*10^n is a sum of two successive primes.

Programs

Mathematica

Select[(Total /@ Partition[Prime[Range[300]], 2, 1]), Mod[#, 10] < 1 &]

PARI

p=13;forprime(q=17,1000,s=p+q;s%10<1&&print1(s", ");p=q)