login
A082455
a(n) = prime(n) + prime(n-1) - a(n-1), a(0) = 0, a(1) = 4.
2
0, 4, 1, 7, 5, 13, 11, 19, 17, 25, 27, 33, 35, 43, 41, 49, 51, 61, 59, 69, 69, 75, 77, 85, 87, 99, 99, 105, 105, 111, 111, 129, 129, 139, 137, 151, 149, 159, 161, 169, 171, 181, 179, 193, 191, 199, 197, 213, 221, 229, 227, 235, 237, 243, 249, 259, 261, 271, 269, 279
OFFSET
0,2
MATHEMATICA
g[x_] := Prime[x]+Prime[x-1]-g[x-1] g[0]=0; g[1]=4; Table[g[w], {w, 0, 100}]
CROSSREFS
If initial values are {a[0]=0, a[1]=1} we get A014687.
If initial values are {a[0]=1, a[1]=2} we get the primes, A000040.
Initial values {a[0]=1, a[1]=3} give A014686.
See also A082454.
Sequence in context: A344970 A135857 A156558 * A140657 A348564 A253635
KEYWORD
nonn
AUTHOR
Labos Elemer, Apr 25 2003
EXTENSIONS
Definition corrected by Georg Fischer, May 15 2024
STATUS
approved