OFFSET
0,2
COMMENTS
S(A016873) = (5n+2) gives values n so that above divisions end with digit '2'.
MATHEMATICA
f[n_]:=Module[{r=Range[0, 6]+n}, Times@@r/Total[r]]; Select[f/@Range[0, 50], IntegerQ] (* Harvey P. Dale, Mar 20 2011 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Patrick De Geest, May 15 1998
STATUS
approved