OFFSET
1,1
COMMENTS
Terms calculated by M. F. Hasler.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
MATHEMATICA
Transpose[Select[Partition[Range[2000], 3, 1], DivisorSigma[0, Last[#]] == DivisorSigma[0, First[#]] * DivisorSigma[0, #[[2]]]&]][[1]] + 2 (* Amiram Eldar, Jul 17 2019 after Harvey P. Dale at A175116 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Feb 13 2010
STATUS
approved