|
| |
|
|
A120724
|
|
A prime gap as sum of integers triangular array.
|
|
0
|
|
|
|
2, 3, 5, 5, 7, 11, 7, 9, 13, 11, 13, 17, 23, 13, 15, 19, 25, 17, 19, 23, 29, 37, 19, 21, 25, 31, 39, 23, 25, 29, 35, 43, 29, 31, 35, 41, 49
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,1
|
|
|
LINKS
|
Table of n, a(n) for n=1..37.
|
|
|
FORMULA
|
a(n,m) = Prime[m] + 2*Sum[i, {i, 1, n}]
|
|
|
EXAMPLE
|
2
3, 5
5, 7, 11
7, 9, 13
11, 13, 17, 23
13, 15, 19, 25
17, 19, 23, 29, 37
19, 21, 25, 31, 39
23, 25, 29, 35, 43
29, 31, 35, 41, 49
|
|
|
MATHEMATICA
|
t[n_, m_] := Prime[m] + 2*Sum[i, {i, 1, n}] a = Table[Table[t[n, m], {n, 0, PrimePi[m]}], {m, 1, 10}] Flatten[a]
|
|
|
CROSSREFS
|
Sequence in context: A156899 A156898 A084754 * A117530 A094749 A096539
Adjacent sequences: A120721 A120722 A120723 * A120725 A120726 A120727
|
|
|
KEYWORD
|
nonn,uned,tabf,changed
|
|
|
AUTHOR
|
Roger Bagula, Aug 18 2006
|
|
|
STATUS
|
approved
|
| |
|
|