|
Search: id:A082456
|
|
|
| A082456 |
|
a(n)=p[n]+p[n-1]-a(n-1), with a[0]=0,a[1]=127, p[i] = i-th prime. |
|
+0
1
|
|
| 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; listen)
|
|
|
OFFSET
|
0,2
|
|
|
COMMENT
|
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: A078206 A025037 A051335 this_sequence A080540 A077358 A069686
Adjacent sequences: A082453 A082454 A082455 this_sequence A082457 A082458 A082459
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), Apr 25 2003
|
|
EXTENSIONS
|
Entry revised by njas, Dec 22 2005
|
|
|
Search completed in 0.002 seconds
|
