login
Prime sum of squared build up triangular array.
0

%I #5 Mar 12 2014 16:36:54

%S 2,3,9,5,11,35,7,13,37,11,17,41,95,13,19,43,97,17,23,47,101,197,19,25,

%T 49,103,199,23,29,53,107,203,29,35,59,113,209

%N Prime sum of squared build up triangular array.

%F a(n,m) = Prime[m] + 6*Sum[i^2, {i, 1, n}]

%e 2

%e 3, 9

%e 5, 11, 35

%e 7, 13, 37

%e 11, 17, 41, 95

%e 13, 19, 43, 97

%e 17, 23, 47, 101, 197

%e 19, 25, 49, 103, 199

%e 23, 29, 53, 107, 203

%e 29, 35, 59, 113, 209

%t t[n_, m_] = Prime[m] + 6*Sum[i^2, {i, 1, n}] a = Table[Table[t[n, m], {n, 0, PrimePi[m]}], {m, 1, 10}] Flatten[a]

%K nonn

%O 1,1

%A _Roger L. Bagula_, Aug 18 2006