A050982
5-idempotent numbers.
Original entry on oeis.org
1, 30, 525, 7000, 78750, 787500, 7218750, 61875000, 502734375, 3910156250, 29326171875, 213281250000, 1510742187500, 10458984375000, 70971679687500, 473144531250000, 3105010986328125, 20091247558593750, 128360748291015625, 810699462890625000
Offset: 5
- Louis Comtet, Advanced Combinatorics, Reidel, 1974, p. 91, #43.
Cf.
A001788,
A036216,
A040075,
A050988,
A050989,
A000389,
A054849,
A036219,
A045543,
A036084,
A140404,
A000389,
A054849,
A036219,
A045543,
A036084,
A140404.
-
[Binomial(n, 5)*5^(n-5): n in [5..25]]; // Vincenzo Librandi, Aug 12 2017
-
seq(binomial(n, 5)*5^(n-5), n=5..32); # Zerinvary Lajos, Jun 16 2008
-
CoefficientList[Series[1 / (1 - 5 x)^6, {x, 0, 33}], x] (* Vincenzo Librandi, Aug 12 2017 *)
-
a(n)=binomial(n, 5)*5^(n-5) \\ Charles R Greathouse IV, Sep 03 2011
A050988
6-idempotent numbers.
Original entry on oeis.org
1, 42, 1008, 18144, 272160, 3592512, 43110144, 480370176, 5043886848, 50438868480, 484213137408, 4489976365056, 40409787285504, 354362750042112, 3037395000360960, 25514118003032064, 210491473525014528, 1708695490967764992, 13669563927742119936, 107917609955858841600
Offset: 6
-
seq(binomial(n, 6)*6^(n-6), n=6..32); # Zerinvary Lajos, Jun 16 2008
A050988:=x^6/(1-6*x)^7; series(A050988,x,32); # Zerinvary Lajos, Aug 09 2008
-
a[n_] := Binomial[n, 6]*6^(n - 6); Array[a, 20, 6] (* Amiram Eldar, Apr 17 2022 *)
A141054
8-idempotent numbers: a(n) = binomial(n+8,8)*8^n.
Original entry on oeis.org
1, 72, 2880, 84480, 2027520, 42172416, 787218432, 13495173120, 215922769920, 3262832967680, 46984794734592, 649244436332544, 8656592484433920, 111869810568069120, 1406363332855726080, 17251390216363573248, 207016682596362878976, 2435490383486622105600
Offset: 0
-
[8^n* Binomial(n+8, 8): n in [0..20]]; // Vincenzo Librandi, Oct 16 2011
-
seq(binomial(n+8,8)*8^n, n=0..17);
-
Table[Binomial[n + 8, 8] 8^n, {n, 0, 15}] (* Michael De Vlieger, Jul 24 2017 *)
-
vector(15,n,binomial(n+7,8)*8^(n-1)) \\ Derek Orr, Jul 24 2017
A170932
a(n) = binomial(n + 8, 8)*7^n .
Original entry on oeis.org
1, 63, 2205, 56595, 1188495, 21630609, 353299947, 5299499205, 74192988870, 980996186170, 12360551945742, 149450309889426, 1743586948709970, 19715944727720430, 216875392004924730, 2327795874186192102, 24441856678955017071, 251607348165713411025
Offset: 0
- Vincenzo Librandi, Table of n, a(n) for n = 0..300
- Index entries for linear recurrences with constant coefficients, signature (63,-1764,28812,-302526,2117682,-9882516,29647548,-51883209,40353607).
-
[Binomial(n + 8, 8)*7^n: n in [0..20]]; // Vincenzo Librandi, Oct 12 2011
-
Table[Binomial[n + 8, 8]*7^n, {n, 0, 20}]
Showing 1-4 of 4 results.
Comments