|
%I #13 Jun 04 2023 11:57:56
%S 3,15,120,1320,21120,401280,9630720,260029440,8320942080,324516741120,
%T 13629703127040,667855453224960,36064194474147840,2055659085026426880,
%U 127450863271638466560,8794109565743054192640,668352326996472118640640
%N a(n) = Product_{k=1..n}(k + prime(k)).
%C a(n) < A000142(n) + A002110(n) for n>1;
%C a(n) = Product_{k=1..n}A014688(k).
%H Harvey P. Dale, <a href="/A093570/b093570.txt">Table of n, a(n) for n = 1..342</a>
%t Table[ Product[k + Prime[k], {k, n}], {n, 17}] (* _Robert G. Wilson v_, Apr 07 2004 *)
%t FoldList[Times,Table[m+Prime[m],{m,20}]] (* _Harvey P. Dale_, Jun 04 2023 *)
%Y Cf. A093572, A093571.
%K nonn
%O 1,1
%A _Reinhard Zumkeller_, Apr 01 2004
%E More terms from _Robert G. Wilson v_, Apr 07 2004
|
