login
A197190
a(0) = 2, a(n) = Lucas(phi(n^2)) for n > 0.
1
2, 1, 3, 18, 47, 15127, 322, 599074578, 4870847, 192900153618, 228826127, 97418273275323406890123, 10749957122, 400010949097364802732720796316482, 358890350005878082, 11981655542024930675232002, 562882766124611619513723647, 699259133978938420550028971714417160188479526095241271647
OFFSET
0,1
LINKS
FORMULA
a(n) = A000032(A002618(n)) for n > 0.
PROG
(Magma) [2] cat [Lucas(EulerPhi(n^2)): n in [1..20]];
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Oct 13 2011
STATUS
approved