|
|
A120724
|
|
Irregular triangle T(n, k) = prime(n) + k*(k-1), for n >= 1 and 1 <= k <= 1 + A000720(n), read by rows.
|
|
1
|
|
|
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, 31, 33, 37, 43, 51, 61, 37, 39, 43, 49, 57, 67, 41, 43, 47, 53, 61, 71, 83, 43, 45, 49, 55, 63, 73, 85, 47, 49, 53, 59, 67, 77, 89
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
T(n, k) = prime(k) + 2*Sum_{j=1..n-1} j, for n >= 1 and 1 <= k <= 1 + A000720(n).
T(n, k) = prime(n) + k*(k-1).
|
|
EXAMPLE
|
Irregular triangle begins as:
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_, k_]:= Prime[n] + k*(k-1);
Table[T[n, k], {n, 20}, {k, PrimePi[n]+1}]//Flatten
|
|
PROG
|
(Magma)
A120724:= func< n, k | NthPrime(n) +k*(k-1) >;
(SageMath)
def A120724(n, k): return nth_prime(n) + k*(k-1)
flatten([[A120724(n, k) for k in range(1, prime_pi(n)+2)] for n in range(1, 21)]) # G. C. Greubel, Jul 20 2023
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,tabf,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|