OFFSET
0,3
COMMENTS
LINKS
Antti Karttunen, Table of n, a(n) for n = 0..2558; rows 0-5 of the triangle
Matthias Schmitt, A function to calculate all relative prime numbers up to the product of the first n primes, arXiv:1404.0706 [math.NT] (see pages 3-4).
EXAMPLE
Irregular triangle begins as:
n\k| 0 1 2 3 4 5
---+--------------------------------------------
0 | 1
1 | 1, 2;
2 | 1, 6, 9, 2, 3, 18;
3 | 1, 30, 225, 250, 1875, 18, 5, 150, 1125, 1250, 3, 90, 25, 750, 5625, 2, 15, ...
4 | 1, 210, 11025, 85750, 4501875, 302526, 588245, 150, 7875, ...
PROG
(PARI)
up_to_row = 5;
A002110(n) = prod(i=1, n, prime(i));
A143293(n) = { if(n==0, return(1)); my(P=1, s=1); forprime(p=2, prime(n), s+=P*=p); s; };
A391933_list(up_to_row) = { my(v = vector(A143293(up_to_row)-1), j=0); for(row=1, up_to_row, for(k=0, A002110(row)-1, j++; v[j] = prod(i=1, row, prime(i)^(k % prime(i))))); (v); };
v391933 = A391933_list(up_to_row);
A391933(n) = if(!n, 1, v391933[n]);
CROSSREFS
KEYWORD
nonn,tabf
AUTHOR
Antti Karttunen, Dec 29 2025
STATUS
approved
