|
|
A174497
|
|
Triangle read by rows: T(n,k) = prime(n) mod (prime(n+1)-prime(k)) for 0<k<n+1.
|
|
2
|
|
|
0, 0, 1, 0, 1, 1, 7, 7, 1, 3, 0, 1, 3, 5, 1, 13, 13, 1, 3, 1, 1, 0, 1, 3, 5, 1, 5, 1, 19, 19, 1, 3, 7, 9, 1, 3, 23, 23, 23, 1, 5, 7, 11, 3, 5, 0, 1, 3, 5, 9, 11, 1, 5, 5, 1, 31, 31, 31, 1, 5, 7, 11, 13, 3, 7, 1, 37, 37, 1, 3, 7, 9, 13, 15, 1, 1, 7, 1, 0, 1, 3, 5, 9, 11, 15, 17, 1, 13, 5, 5, 1
(list;
table;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,7
|
|
LINKS
|
Michel Marcus, Rows n=1..100 of triangle, flattened
|
|
EXAMPLE
|
0;
0,1;
0,1,1;
7,7,1,3;
0,1,3,5,1;
13,13,1,3,1,1;
|
|
PROG
|
(Sage) A174497 = flatten([[nth_prime(n) % (nth_prime(n+1)-nth_prime(k)) for k in range(1, n+1)] for n in range(1, 20)]) # D. S. McNeil, Nov 30 2010
(PARI) T(n, k) = prime(n) % (prime(n+1)-prime(k));
tabl(nn) = for (n=1, nn, for (k=1, n, print1(T(n, k), ", ")); print); \\ Michel Marcus, Aug 08 2017
|
|
CROSSREFS
|
Cf. A000040, A086800.
Sequence in context: A171707 A156722 A152565 * A146322 A011376 A011452
Adjacent sequences: A174494 A174495 A174496 * A174498 A174499 A174500
|
|
KEYWORD
|
nonn,tabl,easy
|
|
AUTHOR
|
Juri-Stepan Gerasimov, Nov 28 2010
|
|
STATUS
|
approved
|
|
|
|