A097382 - OEIS

%I #2 Feb 24 2006 03:00:00

%S 1,4,35,20,3003,560,692835,4620,185910725,48048,136745788725,1361360,

%T 4281195077775,22170720,6541380665835015,446185740,

%U 1898924328582105825,5949143200,90048990529077755175

%N a(h) = d(h,j) = lcm( f(h,j,1) ... f(h,j,h) ), when j=2.

%C See A091342, A025558

%F Given (1) f(h, j, a) = ( [ ((a/gcd(a, h)) / gcd(j+1, (a/gcd(a, h)))) * (h(j+1)) ] - [ ((a/gcd(a, h)) / gcd(j+1, (a/gcd(a, h)))) * (ja) ]) / a then let (2) a(h) = d(h, j) = lcm( f(h, j, 1) ... f(h, j, h) )

%e a(2) = 4 = lcm(4,1)

%e a(5) = 3003 = lcm(13,11,3,7,1)

%e a(6) = 560 = lcm(16,7,4,5,8,1)

%e a(13) = 4281195077775 = lcm(37,35,11,31,29,9,25,23,7,19,17,5,1)

%K nonn

%O 1,2

%A Scott C Macfarlan (scottmacfarlan(AT)covance.com), Sep 18 2004