A374170 a(n) is the least nonsquare k such that sigma_n(k) divides sigma_2n(k).
20, 20, 6050, 7203
Offset: 1
Programs
-
PARI
a(n) = my(k=1, f=factor(k)); while (issquare(k) || (sigma(f, 2*n) % sigma(f, n)), f=factor(k++)); k; \\ Michel Marcus, Jun 30 2024
Comments