OFFSET
1,1
FORMULA
MATHEMATICA
a[n_] := DivisorSum[n, MoebiusMu[n/#] * LucasL[#, 2]^2 &] / n; Array[a, 25] (* Amiram Eldar, Aug 22 2023 *)
PROG
CROSSREFS
KEYWORD
nonn
AUTHOR
Paul D. Hanna, May 17 2012
STATUS
approved