|
| |
|
|
A082456
|
|
a(n)=p[n]+p[n-1]-a(n-1), with a[0]=0,a[1]=127, p[i] = i-th prime.
|
|
0
| |
|
|
0, 127, -122, 130, -118, 136, -112, 142, -106, 148, -96, 156, -88, 166, -82, 172, -72, 184, -64, 192, -54, 198, -46, 208, -36, 222, -24, 228, -18, 234, -12, 252, 6, 262, 14, 274, 26, 282, 38, 292, 48, 304, 56, 316, 68, 322, 74, 336, 98, 352, 104, 358, 114, 366, 126, 382, 138, 394, 146, 402, 156, 408, 168, 432, 186, 438
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,2
|
|
|
COMMENTS
| If initial values are {a[0]=0,a[1]=1} then A014687 is obtained.
If initial values are {a[0]=1,a[1]=2} then A000040 is obtained.
Initial values {a[0]=1,a[1]=3} give A014686.
|
|
|
MATHEMATICA
| g[x_] := Prime[x]+Prime[x-1]-g[x-1] g[0]=0; g[1]=127; Table[g[w], {w, 0, 100}]
|
|
|
CROSSREFS
| See also A082454-A082455.
Cf. A000040, A014686, A014687, A082454, A082455.
Sequence in context: A186995 A145586 A180352 * A080540 A077358 A069686
Adjacent sequences: A082453 A082454 A082455 * A082457 A082458 A082459
|
|
|
KEYWORD
| sign
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), Apr 25 2003
|
|
|
EXTENSIONS
| Entry revised by N. J. A. Sloane (njas(AT)research.att.com), Dec 22 2005
|
| |
|
|
