A118132 - OEIS

%I #3 Mar 30 2012 17:34:21

%S 3,5,5,11,17,23,29,61,127,211,83,257,619,1297,2399,241,1021,3121,7759,

%T 16787,32749,727,4093,15619,46649,117643,262139,531383,2179,16381,

%U 78121,279919,823541,2097143,4782971,9999991,6563,65537,390581,1679609

%N Triangle read by rows n>=0: the largest prime <= m^n+2 in columns m=3..n+3.

%F a(n,m) = A007917(m^n+2) .

%e The triangle starts in row n=0 as:

%e 3;

%e 5, 5 ;

%e 11, 17, 23 ;

%e 29, 61, 127, 211 ;

%e 83, 257, 619, 1297, 2399 ;

%e 241, 1021, 3121, 7759, 16787, 32749 ;

%e 727, 4093, 15619, 46649, 117643, 262139, 531383 ;

%e 2179, 16381, 78121, 279919, 823541, 2097143, 4782971, 9999991 ;

%t f[n_, m_] := If[PrimeQ[n^m + 2], n^m + 2, Prime[PrimePi[n^m + 2]]] a = Table[Table[f[n, m], {n, 3, m + 3}], {m, 0, 9}] c = Flatten[a]

%K nonn,tabl

%O 0,1

%A _Roger L. Bagula_, May 13 2006

%E Definition simplified, formula simplified by Assoc. Eds. of the OEIS, Jun 15 2010