OFFSET
1,1
COMMENTS
The asymptotic density of this sequence is 1 - zeta(7)/zeta(6) = 0.0088404638... (Sathe, 1945).
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
Eckford Cohen, Arithmetical Notes, XIII. A Sequal to Note IV, Elemente der Mathematik, Vol. 18 (1963), pp. 8-11.
S. S. Pillai, On a congruence property of the divisor function, J. Indian Math. Soc. (N. S.), Vol. 6, (1942), pp. 118-119.
L. G. Sathe, On a congruence property of the divisor function, American Journal of Mathematics, Vol. 67, No. 3 (1945), pp. 397-406.
FORMULA
EXAMPLE
64 is a term since A000005(64) = 7 is divisible by 7.
MAPLE
q:= n-> is(irem(numtheory[tau](n), 7)=0):
select(q, [$1..5500])[]; # Alois P. Heinz, Jul 26 2020
MATHEMATICA
Select[Range[5000], Divisible[DivisorSigma[0, #], 7] &]
CROSSREFS
KEYWORD
nonn
AUTHOR
Amiram Eldar, Jul 26 2020
STATUS
approved