|
%I #14 Nov 28 2018 09:32:30
%S 1,2,3,5,9,13,19,25,33,41,51,61,73,85,99,113,129,145,163,181,201,221,
%T 243,265,289,313,339,365,393,421,451,481,513,545,579,613,649,685,723,
%U 761,801,841,883,925,969,1013,1059,1105,1153,1201,1251,1301,1353,1405
%N Group the natural numbers such that the product of the terms of the n-th group is divisible by n!. (1),(2),(3,4),(5,6,7,8),(9,10,11,12),(13,14,15,16,17,18),(19,20,21,22,23,24),... Sequence contains the first term of every group.
%C Differs from A099392 at n = 61.
%t i = 1; Table[p = i; s = i; While[!Divisible[p *= i++, n!]]; s, {n, 1, 54}] (* _Jon Maiga_, Nov 28 2018 *)
%Y Cf. A085912, A085914, A085915.
%K nonn
%O 1,2
%A _Amarnath Murthy_ and Meenakshi Srikanth (menakan_s(AT)yahoo.com), Jul 10 2003
%E More terms from _Ray Chandler_, Sep 15 2003
|
