|
Search: id:A122264
|
|
|
| A122264 |
|
2 X 2 vector matrix Markov of a Prime gap affine type. |
|
+0
1
|
|
| 2, 7, 12, 25, 30, 43, 48, 61, 82, 87, 108, 121, 126, 139, 160, 181, 186, 207, 220, 225, 246, 259, 280, 309, 322, 327, 340, 345, 358, 411, 424, 445, 450, 487, 492, 513, 534, 547, 568, 589, 594, 631, 636, 649, 654, 699, 744, 757, 762, 775
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
FORMULA
|
M = {{0, 1}, {-1, 2}}; v[1] = {2, 3}; v[n_] := v[n] = M.v[n - 1] + 2*{Prime[n + 1] - Prime[n], Prime[n + 2] - Prime[n + 1]}; a(n) = v[n][[n]]
|
|
MATHEMATICA
|
M = {{0, 1}, {-1, 2}}; v[1] = {2, 3}; v[n_] := v[n] = M.v[n - 1] + 2*{Prime[n + 1] - Prime[n], Prime[n + 2] - Prime[n + 1]}; a = Table[v[n][[1]], {n, 1, 50}]
|
|
CROSSREFS
|
Sequence in context: A137401 A119713 A135541 this_sequence A079824 A059329 A102371
Adjacent sequences: A122261 A122262 A122263 this_sequence A122265 A122266 A122267
|
|
KEYWORD
|
nonn,uned
|
|
AUTHOR
|
Roger Bagula (rlbagulatftn(AT)yahoo.com), Oct 18 2006
|
|
|
Search completed in 0.002 seconds
|
