OFFSET
1,1
COMMENTS
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
EXAMPLE
26 is a term since 26 = 2 * 13 and 27 = 3^3 have different prime signatures, and d(26) = d(27) = 4.
MATHEMATICA
Select[Range[3000], DivisorSigma[0, #] == DivisorSigma[0, #+1] && Sort[FactorInteger[#][[;; , 2]]] != Sort[FactorInteger[#+1][[;; , 2]]] &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Amiram Eldar, Mar 06 2020
STATUS
approved