OFFSET
1,1
LINKS
Jaroslav Krizek, Table of n, a(n) for n = 1..1000
EXAMPLE
35 is in sequence because tau(35) = tau(38) = 4.
MAPLE
with(numtheory): A276713:=n->`if`(tau(n) = tau(n+3), n, NULL): seq(A276713(n), n=1..10^3); # Wesley Ivan Hurt, May 02 2017
MATHEMATICA
SequencePosition[DivisorSigma[0, Range[600]], {x_, _, _, x_}][[All, 1]] (* Harvey P. Dale, Nov 12 2022 *)
PROG
(Magma) [n: n in [1..10000] | NumberOfDivisors(n) eq NumberOfDivisors(n+3)]
(PARI) isok(n) = numdiv(n) == numdiv(n+3); \\ Michel Marcus, May 03 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Jaroslav Krizek, Sep 16 2016
STATUS
approved