login
Smallest starting abundant number for n consecutive even abundant numbers.
0

%I #10 Nov 07 2013 16:44:30

%S 12,18,100,348,2988,801340,221355126,221355126,895257140404

%N Smallest starting abundant number for n consecutive even abundant numbers.

%e a(6) = 801340 because 801340 is the starting abundant number for 6 consecutive even abundant numbers: 801340, 801342, 801344, 801346, 801348, 801350.

%t k = 2; cnt = 0; Table[While[If[abunQ[k], cnt++, cnt = 0]; cnt < n, k = k + 2]; k = k + 2; k - 2*n, {n, 6}] (* _T. D. Noe_, Nov 04 2013 *)

%Y Cf. A005101, A108926, A231086, A231088, A231089, A231090, A231092, A231093.

%K nonn,more,hard

%O 1,1

%A _Shyam Sunder Gupta_, Nov 03 2013

%E a(9) from _Donovan Johnson_, Nov 07 2013