OFFSET
1,2
EXAMPLE
Triangle begins:
1,
4, 1,
5, 8, 1,
4, 6, 2, 1,
2, 4, 4, 2, 1,
8, 2, 4, 2, 2, 1,
MATHEMATICA
Table[PowerMod[2, #[[n]] - #[[;; n]], #[[n]]], {n, Length[#]}] & [Select[Range[50], PrimeOmega[#] == 2 &]] (* Paolo Xausa, Jun 28 2024 *)
PROG
(PARI) trg(nn) = {semip = select(n->bigomega(n) == 2, vector(nn, i, i)); for (n = 1, #semip, for (k = 1, n, print1(2^(semip[n] - semip[k]) % semip[n], ", "); ); print(); ); } \\ Michel Marcus, Sep 11 2013
CROSSREFS
KEYWORD
nonn,tabl
AUTHOR
Juri-Stepan Gerasimov, Dec 10 2010
EXTENSIONS
Corrected by D. S. McNeil, Dec 10 2010
STATUS
approved