login
Arguments n for which the Carmichael lambda function A002322(n) is a perfect square.
2

%I #11 Sep 02 2014 18:46:57

%S 1,2,5,10,15,16,17,20,30,34,37,40,48,51,60,64,68,74,80,85,95,101,102,

%T 111,120,125,135,136,148,170,185,190,192,197,202,204,222,240,247,250,

%U 255,256,257,259,270,272,285,296,303,304,320,323,333,340,351,370,375,380,394,401

%N Arguments n for which the Carmichael lambda function A002322(n) is a perfect square.

%H Reinhard Zumkeller, <a href="/A173694/b173694.txt">Table of n, a(n) for n = 1..10000</a>

%F A010052(A002322(a(n))) = 1. - _Reinhard Zumkeller_, Sep 02 2014

%e 37 is in the sequence because lambda(37) = 36 = 6^2.

%p for n from 1 to 500 do if issqr(numtheory[lambda](n) ) then printf("%d,",n) ; end if; end do:

%o (Haskell)

%o a173694 n = a173694_list !! (n-1)

%o a173694_list = filter ((== 1) . a010052 . a002322) [1..]

%o -- _Reinhard Zumkeller_, Sep 02 2014

%Y Cf. A002322.

%Y Cf. A010052.

%K nonn

%O 1,2

%A _Michel Lagneau_, Nov 25 2010

%E Definition rephrased - _R. J. Mathar_, Nov 26 2010