OFFSET
2,1
COMMENTS
It is conjectured that sequence gives period length of the periodic sequence {A088957(k) mod n}_{k>n}.
The records of this sequence are given by A036689 (product of a prime and the previous number). - Michel Marcus, May 19 2015
LINKS
Ivan Neretin, Table of n, a(n) for n = 2..1000
FORMULA
For p the k-th prime, a(p) = A036689(k). - Michel Marcus, May 19 2015
a(n) = n*A070777(n). - Michel Marcus, May 19 2015
MAPLE
seq(n*(max(numtheory:-factorset(n))-1), n=2..100); # Robert Israel, May 19 2015
MATHEMATICA
Table[n*(FactorInteger[n][[-1, 1]] - 1), {n, 2, 57}] (* Ivan Neretin, May 19 2015 *)
PROG
(PARI) a(n)=n*(component(factor(n), 1)-1)
CROSSREFS
KEYWORD
nonn
AUTHOR
Benoit Cloitre, Nov 21 2003
STATUS
approved