|
Search: id:A091292
|
|
|
| A091292 |
|
Numbers n such that the following quotient is an integer: (sigma[n]+sigma[n+1]+sigma[n+2])/sigma[3n+3], i.e. sum[sigma[j]]/sigma[sum[j]] for 3 terms summed up is integer. |
|
+0
1
|
|
| 424, 2134, 20154, 23954, 27344, 27584, 37414, 45154, 74874, 89654, 503810, 1327292, 1910174, 8976614, 13954744, 17386316, 20920074, 22436224, 22937784, 23253068, 29705192, 70524530, 78617972, 81607504, 85815924, 94163306
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
MATHEMATICA
|
g[x_, k_] := Apply[Plus, Table[sg[x+j], j, 0, k-1}]]/ sg[Apply[Plus, Table[x+j, j, 0, k-1}]]] Do[s=g[n, 3]; If[IntegerQ[s], Print[n]], n, 1, 10000000}]
|
|
CROSSREFS
|
Cf. A000203, A091287-A091293.
Sequence in context: A096024 A091293 A134218 this_sequence A160098 A048922 A045094
Adjacent sequences: A091289 A091290 A091291 this_sequence A091293 A091294 A091295
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), Feb 17 2004
|
|
EXTENSIONS
|
a(15)-a(26) from Donovan Johnson (donovan.johnson(AT)yahoo.com), Feb 01 2009
|
|
|
Search completed in 0.002 seconds
|
