OFFSET
1,4
EXAMPLE
\k 1 2 3 4 5 6 7 8 9 10 ...
n\
1 0 1 1 0 1 0 1 0 0 0 ...
2 1 1 1 1 0 1 1 0 1 1 ...
3 2 1 1 1 1 1 1 1 0 1 ...
4 2 2 1 1 2 1 0 2 0 1 ...
5 3 1 2 2 1 1 1 1 2 1 ...
6 3 2 2 2 1 1 2 2 1 1 ...
7 4 2 2 1 2 2 2 1 2 1 ...
8 4 2 3 2 1 3 1 2 2 2 ...
9 4 3 2 2 3 2 2 2 2 2 ...
10 4 4 2 2 3 2 2 3 2 1 ...
...
MATHEMATICA
T[n_, k_] := PrimePi[n*k] - PrimePi[n(k -1)]; Table[ t[r -c +1, c], {r, 13}, {c, r}] // Flatten
PROG
(PARI) T(n, k) = primepi(n*k) - primepi(n*(k-1)); \\ Michel Marcus, Dec 10 2025
CROSSREFS
By rows: (1) A010051, (4) A157865, (9) A155462, (10) A038800, (30) A098592, (100) A038822, (210) A094892, (1000) A038823, (10^4) A038824, (10^5) A038825, (10^6) A038826, (10^7) A038827, (10^8) A038828, (10^9) A038829, (10^10) A038830, (10^11) A038831, (10^12) A038832, (10^13) A080132.
KEYWORD
AUTHOR
Robert G. Wilson v, Dec 05 2025
STATUS
approved
