# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/
Search: id:a109161
Showing 1-1 of 1
%I A109161 #16 Feb 06 2021 08:51:57
%S A109161 5,15,16,27,28,29,41,42,43,44,57,58,59,60,61,75,76,77,78,79,80,95,96,
%T A109161 97,98,99,100,101,117,118,119,120,121,122,123,124,141,142,143,144,145,
%U A109161 146,147,148,149,167,168,169,170,171,172,173,174,175,176,195,196,197,198,199,200,201,202,203,204,205
%N A109161 Triangle read by rows: T(n, k) = n*(n+9) + k + 5, with T(0, 0) = 5 and T(1, 0) = 15.
%H A109161 G. C. Greubel, Rows n=0..100 of the triangle, flattened
%H A109161 S. Helgason, A Centennial: Wilhelm Killing and the Exceptional Groups, Mathematical Intelligencer 12, no. 3 (1990). [See p. 3.]
%F A109161 T(n, k) = n*(n+9) + k + 5, with T(0, 0) = 5 and T(1, 0) = 15.
%e A109161 Triangle begins as:
%e A109161 5;
%e A109161 15, 16;
%e A109161 27, 28, 29;
%e A109161 41, 42, 43, 44;
%e A109161 57, 58, 59, 60, 61;
%e A109161 75, 76, 77, 78, 79, 80;
%t A109161 T[n_, k_]:= If[n==0 && k==0, 5, If[k==0 && n==1, 15, n*(n+9) +k +5]];
%t A109161 Table[T[n, k], {n, 0, 12}, {k, 0, n}]//Flatten
%o A109161 (Sage)
%o A109161 @CachedFunction
%o A109161 def T(n, k):
%o A109161 if (n==0 and k==0): return 5
%o A109161 elif (k==0 and n==1): return 15
%o A109161 else: return n*(n + 9) + k + 5
%o A109161 flatten([[T(n,k) for k in (0..n)] for n in (0..12)]) # _G. C. Greubel_, Feb 05 2021
%Y A109161 Cf. A106373, A106374, A106403.
%K A109161 nonn,tabl,easy,less
%O A109161 1,1
%A A109161 _Roger L. Bagula_, May 06 2007
%E A109161 More terms and edits by _G. C. Greubel_, Feb 05 2021
# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE