OFFSET
1,3
COMMENTS
(d-7)/2 where d >= 7 is a divisor of 11025, so sequence is finite. - Robert Israel, Jul 12 2018
MATHEMATICA
Select[Range[0, 300], IntegerQ[Times@@Range[#, # + 7] / Total[Range[#, # + 7]]] &] (* Vincenzo Librandi, Jul 13 2018 *)
CROSSREFS
KEYWORD
nonn,fini,full
AUTHOR
Patrick De Geest, May 15 1998
EXTENSIONS
Offset changed by Robert Israel, Jul 12 2018
STATUS
approved