Search: a008776 -id:a008776
|
|
A000420
|
|
Powers of 7: a(n) = 7^n.
(Formerly M4431 N1874)
|
|
+10
143
|
|
|
1, 7, 49, 343, 2401, 16807, 117649, 823543, 5764801, 40353607, 282475249, 1977326743, 13841287201, 96889010407, 678223072849, 4747561509943, 33232930569601, 232630513987207, 1628413597910449, 11398895185373143, 79792266297612001, 558545864083284007
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
Same as Pisot sequences E(1, 7), L(1, 7), P(1, 7), T(1, 7). Essentially same as Pisot sequences E(7, 49), L(7, 49), P(7, 49), T(7, 49). See A008776 for definitions of Pisot sequences.
Sum of coefficients of expansion of (1+x+x^2+x^3+x^4+x^5+x^6)^n.
a(n) is number of compositions of natural numbers into n parts < 7.
The compositions of n in which each natural number is colored by one of p different colors are called p-colored compositions of n. For n>=1, a(n) equals the number of 7-colored compositions of n such that no adjacent parts have the same color. - Milan Janjic, Nov 17 2011
Number of ways to assign truth values to n ternary disjunctions connected by conjunctions such that the proposition is true. For example, a(2) = 49, since for the proposition '(a v b v c) & (d v e v f)' there are 49 assignments that make the proposition true. - Ori Milstein, Dec 31 2022
Equivalently, the number of length-n words over an alphabet with seven letters. - Joerg Arndt, Jan 01 2023
|
|
REFERENCES
|
N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
|
|
LINKS
|
|
|
FORMULA
|
a(n) = 7^n.
a(0) = 1; a(n) = 7*a(n-1).
G.f.: 1/(1-7*x).
E.g.f.: exp(7*x).
4/7 - 5/7^2 + 4/7^3 - 5/7^4 + ... = 23/48. [Jolley, Summation of Series, Dover, 1961]
|
|
EXAMPLE
|
a(2)=49 there are 49 compositions of natural numbers into 2 parts < 7.
|
|
MAPLE
|
A000420:=-1/(-1+7*z); # Simon Plouffe in his 1992 dissertation. [This is actually the generating function, so convert(series(...), list) would yield the actual sequence. - M. F. Hasler, Apr 19 2015]
|
|
MATHEMATICA
|
|
|
PROG
|
(Maxima) makelist(7^n, n, 0, 20); /* Martin Ettl, Dec 27 2012 */
(Haskell)
a000420 = (7 ^)
|
|
CROSSREFS
|
Cf. A000079 (powers of 2), A000244 (powers of 3), A000302 (powers of 4), A000351 (powers of 5), A000400 (powers of 6), A001018 (powers of 8), ..., A001029 (powers of 19), A009964 (powers of 20), ..., A009992 (powers of 48), A087752 (powers of 49).
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|
|
A001018
|
|
Powers of 8: a(n) = 8^n.
(Formerly M4555 N1937)
|
|
+10
126
|
|
|
1, 8, 64, 512, 4096, 32768, 262144, 2097152, 16777216, 134217728, 1073741824, 8589934592, 68719476736, 549755813888, 4398046511104, 35184372088832, 281474976710656, 2251799813685248, 18014398509481984, 144115188075855872, 1152921504606846976, 9223372036854775808, 73786976294838206464, 590295810358705651712, 4722366482869645213696
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
Same as Pisot sequences E(1, 8), L(1, 8), P(1, 8), T(1, 8). Essentially same as Pisot sequences E(8, 64), L(8, 64), P(8, 64), T(8, 64). See A008776 for definitions of Pisot sequences.
If X_1, X_2, ..., X_n is a partition of the set {1..2n} into blocks of size 2 then, for n>=1, a(n) is equal to the number of functions f : {1..2n} -> {1,2,3} such that for fixed y_1,y_2,...,y_n in {1,2,3} we have f(X_i)<>{y_i}, (i=1..n). - Milan Janjic, May 24 2007
The compositions of n in which each natural number is colored by one of p different colors are called p-colored compositions of n. For n>=1, a(n) equals the number of 8-colored compositions of n such that no adjacent parts have the same color. - Milan Janjic, Nov 17 2011
a(n) is equal to the determinant of a 3 X 3 matrix with rows 2^(n+2), 2^(n+1), 2^n; 2^(n+3), 2^(n+4), 2(n+3); 2^n, 2^(n+1), 2^(n+2) when it is divided by 144. - J. M. Bergot, May 07 2014
a(n) gives the number of small squares in the n-th iteration of the Sierpinski carpet fractal. Equivalently, the number of vertices in the n-Sierpinski carpet graph. - Allan Bickle, Nov 27 2022
|
|
REFERENCES
|
K. H. Rosen et al., eds., Handbook of Discrete and Combinatorial Mathematics, CRC Press, 2017; p. 15.
N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
|
|
LINKS
|
|
|
FORMULA
|
a(n) = 8^n.
a(0) = 1; a(n) = 8*a(n-1) for n > 0.
G.f.: 1/(1-8*x).
E.g.f.: exp(8*x).
a(n) = (-1)^n*(1 + sqrt(-3))^(3*n) (see Nunn, p. 9).
a(n) = (-1)^n*Sum_{k=0..floor(3*n/2)} (-3)^k*binomial(3*n, 2*k) (see Nunn, p. 9). (End)
|
|
EXAMPLE
|
For n=1, the 1st order Sierpinski carpet graph is an 8-cycle.
|
|
MAPLE
|
|
|
MATHEMATICA
|
|
|
PROG
|
(Maxima) makelist(8^n, n, 0, 20); /* Martin Ettl, Nov 12 2012 */
(Haskell)
a001018 = (8 ^)
(Python)
|
|
CROSSREFS
|
Cf. A000079 (powers of 2), A000244 (powers of 3), A000302 (powers of 4), A000351 (powers of 5), A000400 (powers of 6), A000420 (powers of 7), A001019 (powers of 9), ..., A001029 (powers of 19), A009964 (powers of 20), ..., A009992 (powers of 48), A087752 (powers of 49), A165800 (powers of 50), A159991 (powers of 60).
Cf. A271939 (number of edges in the n-Sierpinski carpet graph).
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|
|
|
|
2, 8, 32, 128, 512, 2048, 8192, 32768, 131072, 524288, 2097152, 8388608, 33554432, 134217728, 536870912, 2147483648, 8589934592, 34359738368, 137438953472, 549755813888, 2199023255552, 8796093022208, 35184372088832, 140737488355328, 562949953421312
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
COMMENTS
|
Same as Pisot sequences E(2, 8), L(2, 8), P(2, 8), T(2, 8). See A008776 for definitions of Pisot sequences.
In the Chebyshev polynomial of degree 2n, a(n) is the coefficient of x^2n. - Benoit Cloitre, Mar 13 2002
Number of ways of placing an even number of indistinguishable objects in n + 1 distinguishable boxes with at most 3 objects in box.
Number of compositions of even natural numbers into n + 1 parts less than or equal to 3 (0 is counted as part). (End)
Also the number of maximal cliques in the (n+1)-Sierpinski tetrahedron graph for n > 0. - Eric W. Weisstein, Dec 01 2017
Assuming the Collatz conjecture is true, any starting number eventually leads to a power of 2. A number in this sequence can never be the first power of 2 in a Collatz sequence except of course for the Collatz sequence starting with that number. For example, except for 8, 4, 2, 1, any Collatz sequence that includes 8 must also include 16 (e.g., 5, 16, 8, 4, 2, 1). - Alonso del Arte, Oct 01 2019
First differences of A020988, and thus the "wavelengths" of the local maxima in A020986. See the Brillhart and Morton link, pp. 855-856. - John Keith, Mar 04 2021
|
|
REFERENCES
|
Adi Dani, Quasicompositions of natural numbers, Proceedings of III congress of mathematicians of Macedonia, Struga Macedonia 29 IX -2 X 2005 pages 225-238.
|
|
LINKS
|
|
|
FORMULA
|
a(n) = 2*4^n.
a(n) = 4*a(n-1).
1 = 1/2 + Sum_{n >= 1} 3/a(n) = 3/6 + 3/8 + 3/32 + 3/128 + 3/512 + 3/2048 + ...; with partial sums: 1/2, 31/32, 127/128, 511/512, 2047/2048, ... - Gary W. Adamson, Jun 16 2003
G.f.: 2/(1-4*x). (End)
a(n) = Sum_{k = 0..2*n} (-1)^(k+n)*binomial(4*n + 2, 2*k + 1); a(2*n) = Sum_{k = 0..2*n} binomial(4*n + 2, 2*k + 1) = A013776(n). - Peter Bala, Nov 25 2016
|
|
EXAMPLE
|
G.f. = 2 + 8*x + 32*x^2 + 128*x^3 + 512*x^4 + 2048*x^5 + 8192*x^6 + 32768*x^7 + ...
a(1) = 8 because all compositions of even natural numbers into 2 parts less than or equal to 3 are:
for 0: (0, 0)
for 2: (0, 2), (2, 0), (1, 1)
for 4: (1, 3), (3, 1), (2, 2)
for 6: (3, 3).
a(2) = 32 because all compositions of even natural numbers into 3 parts less than or equal to 3 are:
for 0: (0, 0, 0)
for 2: (0, 0, 2), (0, 2, 0), (2, 0, 0), (0, 1, 1), (1, 0, 1) , (1, 1, 0)
for 4: (0, 1, 3), (0, 3, 1), (1, 0, 3), (1, 3, 0), (3, 0, 1), (3, 1, 0), (0, 2, 2), (2, 0, 2), (2, 2, 0), (1, 1, 2), (1, 2, 1), (2, 1, 1)
for 6: (0, 3, 3), (3, 0, 3), (3, 3, 0), (1, 2, 3), (1, 3, 2), (2, 1, 3), (2, 3, 1), (3, 1, 2), (3, 2, 1), (2, 2, 2)
for 8: (2, 3, 3), (3, 2, 3), (3, 3, 2).
(End)
|
|
MAPLE
|
|
|
MATHEMATICA
|
Table[2^(2 n + 1), {n, 0, 24}]
CoefficientList[Series[2/(1 - 4 x), {x, 0, 20}], x] (* Eric W. Weisstein, Dec 01 2017 *)
|
|
PROG
|
(Haskell)
a004171 = (* 2) . a000302
(Scala) ((List.fill(20)(4: BigInt)).scanLeft(1: BigInt)(_ * _)).map(2 * _) // Alonso del Arte, Sep 12 2019
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|
|
A001019
|
|
Powers of 9: a(n) = 9^n.
(Formerly M4653 N1992)
|
|
+10
109
|
|
|
1, 9, 81, 729, 6561, 59049, 531441, 4782969, 43046721, 387420489, 3486784401, 31381059609, 282429536481, 2541865828329, 22876792454961, 205891132094649, 1853020188851841, 16677181699666569, 150094635296999121, 1350851717672992089, 12157665459056928801
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
Same as Pisot sequences E(1, 9), L(1, 9), P(1, 9), T(1, 9). Essentially same as Pisot sequences E(9, 81), L(9, 81), P(9, 81), T(9, 81). See A008776 for definitions of Pisot sequences.
Except for 1, the largest n-th power with n digits. - Amarnath Murthy, Feb 09 2002
The 2002 comment by Amarnath Murthy should say more precisely "n-th power with *at most* n digits": a(22) has only 21 digits etc., a(44) has only 42 digits etc. - Hagen von Eitzen, May 17 2009
The compositions of n in which each natural number is colored by one of p different colors are called p-colored compositions of n. For n>=1, a(n) equals the number of 9-colored compositions of n such that no adjacent parts have the same color. - Milan Janjic, Nov 17 2011
To be still more precise than Murthy and von Eitzen: the subsequence of the largest n-th power with n digits is a finite sequence, bounded by 9 and 109418989131512359209. It is guaranteed that 10^n has n + 1 digits in base 10, and clearly 9^n < 10^n. With a(22), the number n - log_10 a(n) crosses the 1.0 threshold, and obviously the gulf widens further after that, meaning that for n > 21, m^n can have fewer than n digits or more than n digits but not exactly n digits. - Alonso del Arte, Dec 12 2012
Erasing the last digit of the sum a(n) + a(n+1) brings back a(n). - Eric Angelini, Feb 05 2024
|
|
REFERENCES
|
N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
David Wells, The Penguin Dictionary of Curious and Interesting Integers. London: Penguin Books (1997): p. 196, entry for 109,418,989,131,512,359,209.
|
|
LINKS
|
|
|
FORMULA
|
a(n) = 9^n.
a(0) = 1, a(n) = 9*a(n - 1) for n > 0.
G.f.: 1/(1 - 9*x).
E.g.f.: exp(9*x).
a(n) = det(|v(i+2,j)|, 1 <= i,j <= n), where v(n,k) are central factorial numbers of the first kind with odd indices. - Mircea Merca, Apr 04 2013
|
|
MAPLE
|
|
|
MATHEMATICA
|
|
|
PROG
|
(Haskell)
a001019 = (9 ^)
a001019_list = iterate (* 9) 1
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|
|
A038754
|
|
a(2n) = 3^n, a(2n+1) = 2*3^n.
|
|
+10
95
|
|
|
1, 2, 3, 6, 9, 18, 27, 54, 81, 162, 243, 486, 729, 1458, 2187, 4374, 6561, 13122, 19683, 39366, 59049, 118098, 177147, 354294, 531441, 1062882, 1594323, 3188646, 4782969, 9565938, 14348907, 28697814, 43046721, 86093442, 129140163, 258280326, 387420489
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
In general, for the recurrence a(n) = a(n-1)*a(n-2)/a(n-3), all terms are integers iff a(0) divides a(2) and first three terms are positive integers, since a(2n+k) = a(k)*(a(2)/a(0))^n for all nonnegative integers n and k.
Equals eigensequence of triangle A070909; (1, 1, 2, 3, 6, 9, 18, ...) shifts to the left with multiplication by triangle A070909. - Gary W. Adamson, May 15 2010
The a(n) represent all paths of length (n+1), n >= 0, starting at the initial node on the path graph P_5, see the second Maple program. - Johannes W. Meijer, May 29 2010
a(n) is the difference between numbers of multiple of 3 evil (A001969) and odious (A000069) numbers in interval [0, 2^(n+1)). - Vladimir Shevelev, May 16 2012
A "half-geometric progression": to obtain a term (beginning with the third one) we multiply the before previous one by 3. - Vladimir Shevelev, May 21 2012
Pisano periods: 1, 2, 1, 4, 8, 2, 12, 4, 1, 8, 10, 4, 6, 12, 8, 8, 32, 2, 36, 8, ... . - R. J. Mathar, Aug 10 2012
Numbers k such that the k-th cyclotomic polynomial has a root mod 3. - Eric M. Schmidt, Jul 31 2013
Range of row n of the circular Pascal array of order 6. - Shaun V. Ault, Jun 05 2014
|
|
LINKS
|
|
|
FORMULA
|
a(n) = a(n-1)*a(n-2)/a(n-3) with a(0)=1, a(1)=2, a(2)=3.
a(2*n) = (3/2)*a(2*n-1) = 3^n, a(2*n+1) = 2*a(2*n) = 2*3^n.
a(1)=1, a(n)= 2*a(n-1) if a(n-1) is odd, or a(n)= (3/2)*a(n-1) if a(n-1) is even.
a(n) = (1/6)*(5-(-1)^n)*3^floor(n/2).
a(2*n) = a(2*n-1) + a(2*n-2) + a(2*n-3).
a(2*n+1) = a(2*n) + a(2*n-1). (End)
G.f.: (1+2*x)/(1-3*x^2). - Paul Barry, Aug 25 2003
a(n) = (1 + n mod 2) * 3^floor(n/2).
a(n) = sqrt(3)*(2+sqrt(3))*(sqrt(3))^n/6 - sqrt(3)*(2-sqrt(3))*(-sqrt(3))^n/6. - Paul Barry, Sep 16 2003
a(n+1) = a(n) + a(n - n mod 2). (End)
If p(i) = Fibonacci(i-3) and if A is the Hessenberg matrix of order n defined by A(i,j) = p(j-i+1), (i<=j), A(i,j)=-1, (i=j+1), and A(i,j)=0 otherwise. Then, for n>=1, a(n-1) = (-1)^n det A. - Milan Janjic, May 08 2010
a(n) = 2^((1-(-1)^n)/2)*3^((2*n-1+(-1)^n)/4). - Luce ETIENNE, Aug 11 2014
For n > 0: a(n+1) = a(n) + if a(n) odd then min{a(n), a(n-1)} else max{a(n), a(n-1)}, see also A128588. (End)
E.g.f.: (7*cosh(sqrt(3)*x) + 4*sqrt(3)*sinh(sqrt(3)*x) - 4)/3. - Stefano Spezia, Feb 17 2022
|
|
EXAMPLE
|
In the interval [0,2^5) we have 11 multiples of 3 numbers, from which 10 are evil and only one (21) is odious. Thus a(4) = 10 - 1 = 9. - Vladimir Shevelev, May 16 2012
|
|
MAPLE
|
a[0]:=0:a[1]:=1:for n from 2 to 50 do a[n]:=3*a[n-2]+2 od: seq(a[n]+1, n=0..34); # Zerinvary Lajos, Mar 20 2008
with(GraphTheory): P:=5: G:=PathGraph(P): A:= AdjacencyMatrix(G): nmax:=35; for n from 1 to nmax do B(n):=A^n; a(n):=add(B(n)[1, k], k=1..P) od: seq(a(n), n=1..nmax); # Johannes W. Meijer, May 29 2010
|
|
MATHEMATICA
|
LinearRecurrence[{0, 3}, {1, 2}, 40] (* Harvey P. Dale, Jan 26 2014 *)
CoefficientList[Series[(1+2x)/(1-3x^2), {x, 0, 40}], x] (* Vincenzo Librandi, Aug 18 2016 *)
Module[{nn=20, c}, c=3^Range[0, nn]; Riffle[c, 2c]] (* Harvey P. Dale, Aug 21 2021 *)
|
|
PROG
|
(PARI) a(n)=(1/6)*(5-(-1)^n)*3^floor(n/2)
(PARI) a(n)=3^(n>>1)<<bittest(n, 0)
(Haskell)
import Data.List (transpose)
a038754 n = a038754_list !! n
a038754_list = concat $ transpose [a000244_list, a008776_list]
(Magma) [n le 2 select n else 3*Self(n-2): n in [1..40]]; // Vincenzo Librandi, Aug 18 2016
(SageMath) [2^(n%2)*3^((n-(n%2))/2) for n in range(61)] # G. C. Greubel, Oct 10 2022
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nice,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|
|
A001020
|
|
Powers of 11: a(n) = 11^n.
(Formerly M4807 N2054)
|
|
+10
87
|
|
|
1, 11, 121, 1331, 14641, 161051, 1771561, 19487171, 214358881, 2357947691, 25937424601, 285311670611, 3138428376721, 34522712143931, 379749833583241, 4177248169415651, 45949729863572161, 505447028499293771, 5559917313492231481, 61159090448414546291
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
Same as Pisot sequences E(1, 11), L(1, 11), P(1, 11), T(1, 11). Essentially same as Pisot sequences E(11, 121), L(11, 121), P(11, 121), T(11, 121). See A008776 for definitions of Pisot sequences.
The compositions of n in which each natural number is colored by one of p different colors are called p-colored compositions of n. For n >= 1, a(n) equals the number of 11-colored compositions of n such that no adjacent parts have the same color. - Milan Janjic, Nov 17 2011
a(n), for n <= 4, gives the n-th row of Pascal's triangle (A007318); a(n), n >= 5 "sort of" gives the n-th row of Pascal's triangle, but now the binomial coefficients with more than one digit overlap. - Daniel Forgues, Aug 12 2012
Numbers n such that sigma(11*n) = 11*n + sigma(n). - Jahangeer Kholdi, Nov 13 2013
|
|
REFERENCES
|
N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
|
|
LINKS
|
|
|
FORMULA
|
G.f.: 1/(1-11*x).
E.g.f.: exp(11*x).
|
|
MAPLE
|
|
|
MATHEMATICA
|
|
|
PROG
|
(Maxima) makelist(11*n, n, 0, 20); /* Martin Ettl, Dec 17 2012 */
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|
|
A025192
|
|
a(0)=1; a(n) = 2*3^(n-1) for n >= 1.
|
|
+10
82
|
|
|
1, 2, 6, 18, 54, 162, 486, 1458, 4374, 13122, 39366, 118098, 354294, 1062882, 3188646, 9565938, 28697814, 86093442, 258280326, 774840978, 2324522934, 6973568802, 20920706406, 62762119218, 188286357654, 564859072962, 1694577218886, 5083731656658, 15251194969974
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
Warning: there is considerable overlap between this entry and the essentially identical A008776.
Shifts one place left when plus-convolved (PLUSCONV) with itself. a(n) = 2*Sum_{i=0..n-1} a(i). - Antti Karttunen, May 15 2001
Let M = { 0, 1, ..., 2^n-1 } be the set of all n-bit numbers. Consider two operations on this set: "sum modulo 2^n" (+) and "bitwise exclusive or" (XOR). The results of these operations are correlated.
To give a numerical measure, consider the equations over M: u = x + y, v = x XOR y and ask for how many pairs (u,v) is there a solution? The answer is exactly a(n) = 2*3^(n-1) for n >= 1. The fraction a(n)/4^n of such pairs vanishes as n goes to infinity. - Max Alekseyev, Feb 26 2003
Number of (s(0), s(1), ..., s(2n+2)) such that 0 < s(i) < 6 and |s(i) - s(i-1)| = 1 for i = 1,2,...,2n+2, s(0) = 3, s(2n+2) = 3. - Herbert Kociemba, Jun 10 2004
Number of compositions of n into parts of two kinds. For a string of n objects, before the first, choose first kind or second kind; before each subsequent object, choose continue, first kind, or second kind. For example, compositions of 3 are 3; 2,1; 1,2; and 1,1,1. Using parts of two kinds, these produce respectively 2, 4, 4 and 8 compositions, 2+4+4+8 = 18. - Franklin T. Adams-Watters, Aug 18 2006
In the compositions the kinds of parts are ordered inside a run of identical parts, see example. Replacing "ordered" by "unordered" gives A052945. - Joerg Arndt, Apr 28 2013
Number of permutations of {1, 2, ..., n+1} such that no term is more than 2 larger than its predecessor. For example, a(3) = 18 because all permutations of {1, 2, 3, 4} are valid except 1423, 1432, 2143, 3142, 2314, 3214, in which 1 is followed by 4. Proof: removing (n + 1) gives a still-valid sequence. For n >= 2, can insert (n + 1) either at the beginning or immediately following n or immediately following (n - 1), but nowhere else. Thus the number of such permutations triples when we increase the sequence length by 1. - Joel B. Lewis, Nov 14 2006
Let M = a triangle with (1, 2, 4, 8, ...) as the left border and all other columns = (0, 1, 2, 4, 8, ...). A025192 = lim_{n->oo} M^n, the left-shifted vector considered as a sequence. - Gary W. Adamson, Jul 27 2010
Number of nonisomorphic graded posets with 0 and uniform hasse graph of rank n with no 3-element antichain. ("Uniform" used in the sense of Retakh, Serconek and Wilson. By "graded" we mean that all maximal chains have the same length n.) - David Nacin, Feb 13 2012
Number of vertices (or sides) of the (n-1)-th iteration of a Gosper island. - Arkadiusz Wesolowski, Feb 07 2013
a(n) counts walks (closed) on the graph G(1-vertex; 1-loop, 1-loop, 2-loop, 2-loop, 3-loop, 3-loop, ...). - David Neil McGrath, Jan 01 2015
For n > 0, a(n) are the traces of the even powers of the adjacency matrix M of the simple Lie algebra B_3, tr(M^(2n)) where M = Matrix(row 1; row 2; row 3) = Matrix[0,1,0; 1,0,2; 0,1,0], same as the traces of Matrix[0,2,0; 1,0,1; 0,1,0] (cf. Damianou). The traces of the odd powers vanish.
The characteristic polynomial of M equals determinant(x*I - M) = x^3 - 3x = A127672(3,x), so 1 - 3*x^2 = det(I - x M) = exp(-Sum_{n>=1} tr(M^n) x^n / n), implying Sum_{n>=1} a(n+1) x^(2n) / (2n) = -log(1 - 3*x^2), giving a logarithmic generating function for the aerated sequence, excluding a(0) and a(1).
a(n+1) = tr(M^(2n)), where tr(M^n) = 3^(n/2) + (-1)^n * 3^(n/2) = 2^n*(cos(Pi/6)^n + cos(5*Pi/6)^n) = n-th power sum of the eigenvalues of M = n-th power sum of the zeros of the characteristic polynomial.
The relation det(I - x M) = exp(-Sum_{n>=1} tr(M^n) x^n / n) = Sum_{n>=0} P_n(-tr(M), -tr(M^2), ..., -tr(M^n)) x^n/n! = exp(P.(-tr(M), -tr(M^2), ...)x), where P_n(x(1), ..., x(n)) are the partition polynomials of A036039 implies that with x(2n) = -tr(M^(2n)) = -a(n+1) for n > 0 and x(n) = 0 otherwise, the partition polynomials evaluate to zero except for P_2(x(1), x(2)) = P_2(0,-6) = -6.
Because of the inverse relation between the partition polynomials of A036039 and the Faber polynomials F_k(b1,b2,...,bk) of A263916, F_k(0,-3,0,0,...) = tr(M^k) gives aerated a(n), excluding n=0,1. E.g., F_2(0,-3) = -2(-3) = 6, F_4(0,-3,0,0) = 2 (-3)^2 = 18, and F_6(0,-3,0,0,0,0) = -2(-3)^3 = 54. (Cf. A265185.)
(End)
Number of permutations of length n > 0 avoiding the partially ordered pattern (POP) {1>2, 1>3, 1>4} of length 4. That is, number of length n permutations having no subsequences of length 4 in which the first element is the largest. - Sergey Kitaev, Dec 08 2020
For n > 0, a(n) is the number of 3-colorings of the grid graph P_2 X P_(n-1). More generally, for q > 1, the number of q-colorings of the grid graph P_2 X P_n is given by q*(q - 1)*((q - 1)*(q - 2) + 1)^(n - 1). - Sela Fried, Sep 25 2023
For n > 1, a(n) is the largest solution to the equation phi(x) = a(n-1). - M. Farrokhi D. G., Oct 25 2023
Number of dotted compositions of degree n. - Diego Arcis, Feb 01 2024
|
|
REFERENCES
|
Richard P. Stanley, Enumerative combinatorics, Vol. 1, Cambridge University Press, Cambridge, 1997, pp. 96-100.
|
|
LINKS
|
|
|
FORMULA
|
G.f.: (1-x)/(1-3*x).
E.g.f.: (2*exp(3*x) + exp(0))/3. - Paul Barry, Apr 20 2003
a(0) = 1, a(n) = Sum_{k=0..n-1} (a(k) + a(n-k-1)). - Benoit Cloitre, Jun 24 2003
a(n) = lcm(a(n-1), Sum_{k=1..n-1} a(k)) for n >= 3. - David W. Wilson, Sep 27 2011
For the e.g.f. E(x) = (2/3)*exp(3*x) + exp(0)/3 we have
E(x) = 2*G(0)/3 where G(k) = 1 + k!/(3*(9*x)^k - 3*(9*x)^(2*k+1)/((9*x)^(k+1) + (k+1)!/G(k+1))); (continued fraction, 3rd kind, 3-step).
E(x) = 1+2*x/(G(0)-3*x) where G(k) = 3*x + 1 + k - 3*x*(k+1)/G(k+1); (continued fraction, Euler's 1st kind, 1-step). (End)
G.f.: 1 + ((1/2)/G(0) - 1)/x where G(k) = 1 - 2^k/(2 - 4*x/(2*x - 2^k/G(k+1) )); (recursively defined continued fraction). - Sergei N. Gladkovskii, Dec 22 2012
G.f.: 1 + x*W(0), where W(k) = 1 + 1/(1 - x*(2*k+3)/(x*(2*k+4) + 1/W(k+1))); (continued fraction). - Sergei N. Gladkovskii, Aug 28 2013
Construct the power matrix T(n,j) = [A(n)^*j]*[S(n)^*(j-1)] where A(n)=(2,2,2,...) and S(n)=(0,1,0,0,...). (* is convolution operation.) Then a(n) = Sum_{j=1..n} T(n,j). - David Neil McGrath, Jan 01 2015
G.f.: 1 + 2*x/(1 + 2*x)*( 1 + 5*x/(1 + 5*x)*( 1 + 8*x/(1 + 8*x)*( 1 + 11*x/(1 + 11*x)*( 1 + .... - Peter Bala, May 27 2017
Sum_{n>=0} (-1)^n/a(n) = 5/8.
Product_{n>=1} (1 - 1/a(n)) = A132019. (End)
|
|
EXAMPLE
|
There are a(3)=18 compositions of 3 into 2 kinds of parts. Here p:s stands for "part p of sort s":
01: [ 1:0 1:0 1:0 ]
02: [ 1:0 1:0 1:1 ]
03: [ 1:0 1:1 1:0 ]
04: [ 1:0 1:1 1:1 ]
05: [ 1:0 2:0 ]
06: [ 1:0 2:1 ]
07: [ 1:1 1:0 1:0 ]
08: [ 1:1 1:0 1:1 ]
09: [ 1:1 1:1 1:0 ]
10: [ 1:1 1:1 1:1 ]
11: [ 1:1 2:0 ]
12: [ 1:1 2:1 ]
13: [ 2:0 1:0 ]
14: [ 2:0 1:1 ]
15: [ 2:1 1:0 ]
16: [ 2:1 1:1 ]
17: [ 3:0 ]
18: [ 3:1 ]
G.f. = 1 + 2*x + 6*x^2 + 18*x^3 + 54*x^4 + 162*x^5 + 486*x^6 + 1458*x^7 + ...
|
|
MAPLE
|
A025192 := proc(n): if n=0 then 1 else 2*3^(n-1) fi: end: seq(A025192(n), n=0..26);
|
|
MATHEMATICA
|
|
|
PROG
|
(PARI) Vec((1-x)/(1-3*x) + O(x^100)) \\ Altug Alkan, Dec 05 2015
(Python) [1]+[2*3**(n-1) for n in range(1, 30)] # David Nacin, Mar 04 2012
(Haskell)
a025192 0 = 1
a025192 n = 2 * 3 ^ (n -1)
|
|
CROSSREFS
|
Apart from initial term, same as A008776.
|
|
KEYWORD
|
nonn,nice,easy,eigen
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|
|
|
|
5, 10, 20, 40, 80, 160, 320, 640, 1280, 2560, 5120, 10240, 20480, 40960, 81920, 163840, 327680, 655360, 1310720, 2621440, 5242880, 10485760, 20971520, 41943040, 83886080, 167772160, 335544320, 671088640, 1342177280, 2684354560, 5368709120, 10737418240
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
COMMENTS
|
Same as Pisot sequences E(5,10), L(5,10), P(5,10), T(5,10). See A008776 for definitions of Pisot sequences.
With the addition of "2, 3," at the beginning, this sequence gives terms (n + 3) through the first term greater than 2^n, for n odd, of the negabinary Keith sequence for 2^n, thus proving that with the exception of 2 itself, no odd-indexed power of 2 is a negabinary Keith number (see A188381). - Alonso del Arte, Feb 02 2012
Let b(0) = 5 and b(n+1) = the smallest number not in the sequence such that b(n+1) - Product_{i=0..n} b(i) divides b(n+1) - Sum_{i=0..n} b(i). Then b(n+2) = a(n) for n > 0. - Derek Orr, Jan 15 2015
|
|
LINKS
|
|
|
FORMULA
|
a(n) = 5*2^n. a(n) = 2*a(n-1).
G.f.: 5/(1-2*x).
If m is a term greater than 5 of this sequence then m = 5*phi(phi(m)). - Farideh Firoozbakht, Aug 16 2005
|
|
MATHEMATICA
|
|
|
PROG
|
|
|
CROSSREFS
|
Row sums of (4, 1)-Pascal triangle A093561.
Row sums of (9, 1)-Pascal triangle A093644.
Row sums of (1, 4)-Pascal triangle A095666 (with leading 4).
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|
|
A001025
|
|
Powers of 16: a(n) = 16^n.
(Formerly M5021 N2164)
|
|
+10
67
|
|
|
1, 16, 256, 4096, 65536, 1048576, 16777216, 268435456, 4294967296, 68719476736, 1099511627776, 17592186044416, 281474976710656, 4503599627370496, 72057594037927936, 1152921504606846976, 18446744073709551616, 295147905179352825856, 4722366482869645213696, 75557863725914323419136, 1208925819614629174706176
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
Same as Pisot sequences E(1, 16), L(1, 16), P(1, 16), T(1, 16). Essentially same as Pisot sequences E(16, 256), L(16, 256), P(16, 256), T(16, 256). See A008776 for definitions of Pisot sequences.
The compositions of n in which each natural number is colored by one of p different colors are called p-colored compositions of n. For n >= 1, a(n) equals the number of 16-colored compositions of n such that no adjacent parts have the same color. - Milan Janjic, Nov 17 2011
Right-hand side of the identity ( Sum_{k = 0..n} (2*k + 1)*binomial(2*n + 1, n - k) ) * ( Sum_{k = 0..n} (-1)^k/(2*k + 1)*binomial(2*n + 1, n - k) ) = 16^n. - Peter Bala, Feb 12 2019
|
|
REFERENCES
|
N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
|
|
LINKS
|
|
|
FORMULA
|
G.f.: 1/(1-16*x).
E.g.f.: exp(16*x).
a(n) = 16^n.
a(0) = 1, a(n) = 16*a(n-1). (End)
|
|
MAPLE
|
|
|
MATHEMATICA
|
|
|
PROG
|
(Sage) [lucas_number1(n, 16, 0) for n in range(1, 18)] # Zerinvary Lajos, Apr 29 2009
(Haskell)
a001025 = (16 ^)
(Python) print([16**n for n in range(20)]) # Stefano Spezia, Nov 10 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|
|
A001022
|
|
Powers of 13.
(Formerly M4914 N2107)
|
|
+10
66
|
|
|
1, 13, 169, 2197, 28561, 371293, 4826809, 62748517, 815730721, 10604499373, 137858491849, 1792160394037, 23298085122481, 302875106592253, 3937376385699289, 51185893014090757, 665416609183179841, 8650415919381337933, 112455406951957393129, 1461920290375446110677, 19004963774880799438801
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
Same as Pisot sequences E(1, 13), L(1, 13), P(1, 13), T(1, 13). Essentially same as Pisot sequences E(13, 169), L(13, 169), P(13, 169), T(13, 169). See A008776 for definitions of Pisot sequences.
The compositions of n in which each natural number is colored by one of p different colors are called p-colored compositions of n. For n>=1, a(n) equals the number of 13-colored compositions of n such that no adjacent parts have the same color. - Milan Janjic, Nov 17 2011
Numbers n such that sigma(13*n) = 13*n+sigma(n). - Jahangeer Kholdi, Nov 23 2013
|
|
REFERENCES
|
N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
|
|
LINKS
|
|
|
FORMULA
|
G.f.: 1/(1-13*x).
E.g.f.: exp(13*x).
a(n) = Sum_{k=0..n} A001021(k)*binomial(n,k). It is well known that Sum_{k=0..n} (h-1)^k*binomial(n,k) = h^n. - Bruno Berselli, Aug 06 2013
|
|
EXAMPLE
|
For the fifth formula: a(7) = 1*1 + 12*7 + 144*21 + 1728*35 + 20736*35 + 248832*21 + 2985984*7 + 35831808*1 = 62748517. - Bruno Berselli, Aug 06 2013
|
|
MAPLE
|
|
|
MATHEMATICA
|
|
|
PROG
|
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
Search completed in 0.142 seconds
|