login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A176151 Triangle T(n, k) = 2*(n+1 - mod(n, k+1) - mod(n, n-k+1) ) + (n! - k! - (n-k)!) read by rows. 3

%I #15 Feb 08 2021 05:16:35

%S 1,1,1,1,6,1,1,9,9,1,1,27,26,27,1,1,105,118,118,105,1,1,613,706,714,

%T 706,613,1,1,4333,4930,5016,5016,4930,4333,1,1,35297,39610,40208,

%U 40278,40208,39610,35297,1,1,322577,357856,362168,362742,362742,362168,357856,322577,1

%N Triangle T(n, k) = 2*(n+1 - mod(n, k+1) - mod(n, n-k+1) ) + (n! - k! - (n-k)!) read by rows.

%C Row sums are: 1, 2, 8, 20, 82, 448, 3354, 28560, 270510, 2810688, 31841122, ...

%H G. C. Greubel, <a href="/A176151/b176151.txt">Rows n = 0..100 of the triangle, flattened</a>

%F T(n, k) = 2*(n+1 - mod(n, k+1) - mod(n, n-k+1) ) + (n! - k! - (n-k)!).

%F T(n, k) = 2*A176149(n, k) - A155170(n, k). - _G. C. Greubel_, Feb 07 2021

%e Triangle begins as:

%e 1;

%e 1, 1;

%e 1, 6, 1;

%e 1, 9, 9, 1;

%e 1, 27, 26, 27, 1;

%e 1, 105, 118, 118, 105, 1;

%e 1, 613, 706, 714, 706, 613, 1;

%e 1, 4333, 4930, 5016, 5016, 4930, 4333, 1;

%e 1, 35297, 39610, 40208, 40278, 40208, 39610, 35297, 1;

%e 1, 322577, 357856, 362168, 362742, 362742, 362168, 357856, 322577, 1;

%t Table[2*(n+1 -Mod[n, k+1] -Mod[n, n-k+1]) + (n! -k! -(n-k)!), {n, 0, 10}, {k, 0, n}]//Flatten

%o (Sage) f=factorial; flatten([[2*(n+1 - n%(k+1) - n%(n-k+1)) + (f(n) -f(k) -f(n-k)) for k in (0..n)] for n in (0..12)]) # _G. C. Greubel_, Feb 07 2021

%o (Magma) F:=Factorial;; [2*(n+1 - n mod (k+1) - n mod (n-k+1)) + (F(n) -F(k) -F(n-k)): k in [0..n], n in [0..12]]; // _G. C. Greubel_, Feb 07 2021

%Y Cf. A155170, A176149.

%K nonn,tabl,easy,less

%O 0,5

%A _Roger L. Bagula_, Apr 10 2010

%E Edited by _G. C. Greubel_, Feb 07 2021

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 28 10:54 EDT 2024. Contains 371240 sequences. (Running on oeis4.)