1,3
Some other values: a(15)=298, a(19)=97.
a(12) > 8*10^10. - Giovanni Resta, May 07 2017
Table of n, a(n) for n=1..11.
n=6: sigma(2) + sigma(3) + ... + sigma(7) = 3 + 4 + 7 + 6 + 12 + 8 = 40 = sigma(2 + 3 + ... + 7) = sigma(27) = 1 + 3 + 9 + 27 = 40; quotient = 1.
g[x_, k_] := Apply[Plus, Table[sg[x+j], j, 0, k-1}]]/ sg[Apply[Plus, Table[x+j, j, 0, k-1}]]] Table[fla=1; Do[s=g[n, h]; If[IntegerQ[s]&&Equal[fla, 1], Print[{n, h}]; fla=0], {n, 1, 10000000}], {h, 1, 6}]
Cf. A000203, A091287-A091293.
Sequence in context: A238174 A251013 A230678 * A114808 A134218 A246733
Adjacent sequences: A091290 A091291 A091292 * A091294 A091295 A091296
hard,nonn
Labos Elemer, Feb 17 2004
a(7)-a(11) from Giovanni Resta, May 07 2017
approved