A069805 Smallest k>n such that tau(n) divides tau(k)=A000005(k).

2, 3, 5, 9, 6, 8, 8, 10, 12, 14, 12, 18, 14, 15, 21, 48, 18, 20, 20, 28, 22, 24, 24, 30, 28, 27, 30, 32, 30, 40, 32, 44, 34, 35, 38, 100, 38, 39, 40, 42, 42, 54, 44, 45, 50, 51, 48, 80, 50, 52, 54, 60, 54, 56, 56, 66, 58, 60, 60, 72, 62, 65, 68, 192, 66, 70, 68, 72, 70, 78, 72

Offset

1,1

Links

Ivan Neretin, Table of n, a(n) for n = 1..10000

Prog

(PARI) for(s=1, 100, n=s+1; while(frac(numdiv(n)/numdiv(s))>0, n++); print1(n, ", "); )
(PARI) a(n) = my(k=n+1); while(numdiv(k)%numdiv(n), k++); k; \\ Michel Marcus, Sep 15 2018

Crossrefs

Cf. A000005.

Cf. A140635 (without k>n constraint).

Sequence in context: A342444 A011026 A374531 * A123923 A045965 A323390

Adjacent sequences: A069802 A069803 A069804 * A069806 A069807 A069808

Keyword

easy,nonn

Author

Benoit Cloitre, May 01 2002

Status

approved