A283621 Smallest term A001043(k) with k>n such that A001043(k) is multiple of A001043(n).

30, 24, 24, 36, 120, 60, 144, 84, 520, 120, 204, 390, 840, 360, 300, 1120, 240, 384, 276, 288, 456, 648, 2064, 372, 396, 1428, 630, 648, 2886, 480, 1290, 3216, 828, 576, 600, 924, 1920, 990, 1360, 2112, 3240, 2604, 1920, 1560, 1584, 1230, 2604, 1350, 2280, 924

Offset: 1

Author

Zak Seidov, Mar 12 2017

Keywords

• nonn

Examples

			a(1)=30 because A001043(1)=5 and A001043(6)=30=6*5,
a(2)=24 because A001043(2)=8 and A001043(5)=24=3*8,
a(5)=120 because A001043(1)=24 and A001043(17)=120=5*24.
		

Links

• Zak Seidov, Table of {n, m=A001043(n), k, a(n)=A001043(k), a(n)/m} for n = 1..200.

Crossrefs

Cf. A001043 (sums of 2 successive primes).

Programs

Mathematica

With[{s = #},Table[k = n + 1; While[! Divisible[s[[k]], s[[n]]], k++]; s[[k]], {n, 50}]] &@ Map[Total, Partition[Prime@ Range[10^4 + 1], 2, 1]] (* Michael De Vlieger, Mar 13 2017, after Harvey P. Dale at A001043 *)