A093571 LeastCommonMultiple({k+prime(k): 1<=k<=n}).

3, 15, 120, 1320, 2640, 50160, 50160, 451440, 902880, 11737440, 82162080, 575134560, 575134560, 575134560, 17829171360, 410070941280, 410070941280, 32395604361120, 1393010987528160, 1393010987528160, 65471516413823520

Offset: 1

Author

Reinhard Zumkeller, Apr 01 2004

Keywords

• nonn

Comments

a(n) <= A093570(n).

Crossrefs

Cf. A093572, A014688.

Programs

Mathematica

Table[LCM @@ Table[k + Prime[k], {k, n}], {n, 21}] (* Robert G. Wilson v, Apr 07 2004 *)

Extensions

More terms from Robert G. Wilson v, Apr 07 2004