|
|
A093125
|
|
k associated with A093124.
|
|
1
|
|
|
0, 0, 0, 1, 1, 1, 1, 1, 1, 2, 2, 3, 3, 3, 3, 3, 3, 4, 4, 4, 4, 5, 4, 5, 5, 5, 5, 5, 5
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,10
|
|
LINKS
|
Table of n, a(n) for n=1..29.
|
|
PROG
|
(PARI) { v=vector(30); v[1]=sigma(1); for (i=2, 30, k=0; while (sum(j=i-k, i, sigma(j))<v[i-1], k++); print1(", "k); v[i]=sum(j=i-k, i, sigma(j))); v }
|
|
CROSSREFS
|
Cf. A093124.
Sequence in context: A294234 A078767 A331137 * A226390 A156081 A147954
Adjacent sequences: A093122 A093123 A093124 * A093126 A093127 A093128
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Jon Perry, Mar 22 2004
|
|
STATUS
|
approved
|
|
|
|