%I A038610
%S A038610 1,1,2,3,12,5,60,105,280,63,2520,385,27720,6435,8008,45045,720720,
%T A038610 85085,12252240,2909907,3695120,1322685,232792560,37182145,1070845776,
%U A038610 128707425,2974571600,717084225,80313433200,215656441,2329089562800
%N A038610 Least common multiple of integers less than and prime to n.
%C A038610 If n is a prime power, tau(a(n)) is the number of times n occurs in A034699.
(If n is not a prime power, it does not occur in A034699.) - Franklin
T. Adams-Watters (FrankTAW(AT)Netscape.net), Apr 01 2008
%H A038610 T. D. Noe, <a href="b038610.txt">Table of n, a(n) for n=1..200</a>
%t A038610 Table[ LCM@@ Flatten[ Position[ GCD[ n, # ]& /@ Range[ n ], 1 ] ], {n,
32} ]
%o A038610 (PARI) a(n) = local(r); r=1;for(i=1,n-1,if(gcd(i,n)==1,r=lcm(r,i)));r
- Franklin T. Adams-Watters (FrankTAW(AT)Netscape.net), Apr 01 2008
%Y A038610 Cf. A034699, A000005.
%Y A038610 Sequence in context: A069220 A062957 A124444 this_sequence A056819 A124442
A088611
%Y A038610 Adjacent sequences: A038607 A038608 A038609 this_sequence A038611 A038612
A038613
%K A038610 nonn,nice
%O A038610 1,3
%A A038610 wouter.meeussen(AT)pandora.be
|