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
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, May 01 2002
STATUS
approved