1,2
Terms which are squarefree appear on A121556.
Table of n, a(n) for n=1..40.
isA122839 := proc(m)
A047994(m) ;
modp(numtheory[sigma](m)*A034448(m), %^2) = 0 ;
end proc:
for m from 1 do
if isA122839(m) then
printf("%a, \n", m) ;
end if;
end do: # R. J. Mathar, Sep 04 2018
Cf. A034448, A047994, A121556.
Sequence in context: A146000 A134737 A030733 * A258077 A121556 A123041
Adjacent sequences: A122836 A122837 A122838 * A122840 A122841 A122842
nonn
Yasutoshi Kohmoto, Oct 23 2006
approved