|
%I #19 Jun 28 2015 10:46:05
%S 3,4,4,5,8,5,6,13,13,6,7,19,26,19,7,8,26,45,45,26,8,9,34,71,90,71,34,
%T 9,10,43,105,161,161,105,43,10,11,53,148,266,322,266,148,53,11,12,64,
%U 201,414,588,588,414,201,64,12,13,76,265,615,1002,1176,1002,615,265,76,13
%N Elements in 3-Pascal triangle A028262 (by row) that are not 1.
%C Rows of triangle formed using Pascal's rule except begin and end n-th row with n+3.
%H Reinhard Zumkeller, <a href="/A028263/b028263.txt">Rows n=0..150 of triangle, flattened</a>
%H <a href="/index/Pas#Pascal">Index entries for triangles and arrays related to Pascal's triangle</a>
%F T(n,k) = A007318(n,k) + A014410(n+2,k+1). [_Reinhard Zumkeller_, Mar 12 2012]
%e The triangle T(n,k) begins
%e n\k 0 1 2 3 4 5 6 7 8 9 10 ...
%e 0: 3
%e 1: 4 4
%e 2: 5 8 5
%e 3: 6 13 13 6
%e 4: 7 19 26 19 7
%e 5: 8 26 45 45 26 8
%e 6: 9 34 71 90 71 34 9
%e 7: 10 43 105 161 161 105 43 10
%e 8: 11 53 148 266 322 266 148 53 11
%e 9: 12 64 201 414 588 588 414 201 64 12
%e 10: 13 76 265 615 1002 1176 1002 615 265 76 13
%e ... Reformatted. - _Wolfdieter Lang_, Jun 28 2015
%o (Haskell)
%o a028263 n k = a028263_tabl !! n !! k
%o a028263_row n = a028263_tabl !! n
%o a028263_tabl = zipWith (zipWith (+)) a007318_tabl a014410_tabl
%o -- _Reinhard Zumkeller_, Mar 12 2012
%Y Row sums give A051633(n).
%K nonn,tabl
%O 0,1
%A _Mohammad K. Azarian_
%E More terms from _James A. Sellers_
|
