OFFSET
1,3
COMMENTS
(d-13)/2 for divisors d>=13 of 2608781175. In particular, the sequence is finite. - Robert Israel, Jul 13 2018
LINKS
Robert Israel, Table of n, a(n) for n = 1..372
MAPLE
seq((t-13)/2, t=select(`>=`, numtheory:-divisors(2608781175), 13)); # Robert Israel, Jul 13 2018
MATHEMATICA
Select[Range[0, 500], IntegerQ[Times@@Range[#, #+13]/Total[Range[ #, #+13]]]&] (* Harvey P. Dale, Sep 02 2016 *)
CROSSREFS
KEYWORD
nonn,fini,full
AUTHOR
Patrick De Geest, May 15 1998
EXTENSIONS
Definition corrected by Harvey P. Dale, Sep 02 2016
STATUS
approved