OFFSET
1,8
COMMENTS
Triangle read by rows: T(n,k) = Sigma(prime(n)) mod prime(k), where Sigma(prime(.)) is the sum of divisors of prime.
LINKS
G. C. Greubel, Rows n = 1..50 of the triangle, flattened
EXAMPLE
Triangle begins
1;
0, 1;
0, 0, 1;
0, 2, 3, 1;
0, 0, 2, 5, 1;
0, 2, 4, 0, 3, 1;
0, 0, 3, 4, 7, 5, 1;
0, 2, 0, 6, 9, 7, 3, 1;
0, 0, 4, 3, 2, 11, 7, 5, 1;
0, 0, 0, 2, 8, 4, 13, 11, 7, 1;
MATHEMATICA
Table[Mod[1+Prime[n], Prime[k]], {n, 15}, {k, n}]//Flatten (* G. C. Greubel, Apr 10 2024 *)
PROG
(PARI) trga(nrows) = {for (n=1, nrows, for (k=1, n, print1(sigma(prime(n)) % prime(k), ", "); ); print(); ); } \\ Michel Marcus, Apr 11 2013
(Magma)
[(1+NthPrime(n)) mod NthPrime(k): k in [1..n], n in [1..15]]; // G. C. Greubel, Apr 10 2024
(SageMath)
flatten([[(1+nth_prime(n))%nth_prime(k) for k in range(1, n+1)] for n in range(1, 16)]) # G. C. Greubel, Apr 10 2024
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Juri-Stepan Gerasimov, Dec 02 2010
EXTENSIONS
Corrected by D. S. McNeil, Dec 02 2010
STATUS
approved