|
| |
|
|
A093724
|
|
First occurrence of n in A093723, or -1 in n does not occur.
|
|
1
| |
|
|
109, 1, 34, 2, 6, 11, 5, 26, 35, 17, 13, 33, 75, 21, 55, 24, 68, 45, 79, 148, 202, 236, 261, 230, 193, 330, 481, 524, 771, 227, 618, 1042, 327, 1051, 1128, 687, 966, 632, 1624, 2646, 3739, 2392, 841, 752, 2677, 2785, 3819, 3200, 3598, 1706, 6974, 9479, 9907
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 4,1
|
|
|
MATHEMATICA
| a(4) = 109 since A092613(110) - A092613(109) = 3191+2963+2927+3119 - 3181-2953-2917-3109 = 12200 - 12160 = 40.
t = Table[ A092613[n]/10, {n, 10000}]; d = Drop[t, 1] - Drop[t, -1]; f[n_] := Position[d, n, 1, 1]; Flatten[ Table[ f[n], {n, 4, 59}]]
|
|
|
CROSSREFS
| Cf. A092614, A093723.
Sequence in context: A030248 A033535 A077728 * A130705 A051046 A196667
Adjacent sequences: A093721 A093722 A093723 * A093725 A093726 A093727
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com), Apr 13 2004
|
| |
|
|
