OFFSET
2,1
EXAMPLE
a(4) = 2 as tau(4+2) = tau(6) = 4 and tau(4*2)= tau(8) = 4.
MATHEMATICA
f[n_] := Block[{k = 1}, While[ DivisorSigma[0, n + k] != DivisorSigma[0, n*k], k++ ]; k]; Table[ f[n], {n, 1, 80}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Jun 20 2003
EXTENSIONS
Corrected and extended by Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Jun 25 2003
STATUS
approved