cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-10 of 10 results.

A001018 Powers of 8: a(n) = 8^n.

Original entry on oeis.org

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
Offset: 0

Views

Author

Keywords

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
This is the auto-convolution (convolution square) of A059304. - R. J. Mathar, May 25 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 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

Examples

			For n=1, the 1st order Sierpinski carpet graph is an 8-cycle.
		

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).

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. A032766 (floor(3*n/2)).
Cf. A271939 (number of edges in the n-Sierpinski carpet graph).

Programs

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).
Sum_{n>=0} 1/a(n) = 8/7. - Gary W. Adamson, Aug 29 2008
a(n) = A157176(A008588(n)); a(n+1) = A157176(A016969(n)). - Reinhard Zumkeller, Feb 24 2009
From Stefano Spezia, Dec 28 2021: (Start)
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)

A016945 a(n) = 6*n+3.

Original entry on oeis.org

3, 9, 15, 21, 27, 33, 39, 45, 51, 57, 63, 69, 75, 81, 87, 93, 99, 105, 111, 117, 123, 129, 135, 141, 147, 153, 159, 165, 171, 177, 183, 189, 195, 201, 207, 213, 219, 225, 231, 237, 243, 249, 255, 261, 267, 273, 279, 285, 291, 297, 303, 309, 315, 321, 327
Offset: 0

Views

Author

Keywords

Comments

Apart from initial term(s), dimension of the space of weight 2n cuspidal newforms for Gamma_0(37).
Continued fraction expansion of tanh(1/3).
If a 2-set Y and a 3-set Z are disjoint subsets of an n-set X then a(n-4) is the number of 3-subsets of X intersecting both Y and Z. - Milan Janjic, Sep 08 2007
Leaves of the Odd Collatz-Tree: a(n) has no odd predecessors in all '3x+1' trajectories where it occurs: A139391(2*k+1) <> a(n) for all k; A082286(n)=A006370(a(n)). - Reinhard Zumkeller, Apr 17 2008
Let random variable X have a uniform distribution on the interval [0,c] where c is a positive constant. Then, for positive integer n, the coefficient of determination between X and X^n is (6n+3)/(n+2)^2, that is, A016945(n)/A000290(n+2). Note that the result is independent of c. For the derivation of this result, see the link in the Links section below. - Dennis P. Walsh, Aug 20 2013
Positions of 3 in A020639. - Zak Seidov, Apr 29 2015
a(n+2) gives the sum of 6 consecutive terms of A004442 starting with A004442(n). - Wesley Ivan Hurt, Apr 08 2016
Numbers k such that Fibonacci(k) mod 4 = 2. - Bruno Berselli, Oct 17 2017
Also numbers k such that t^k == -1 (mod 7), where t is a member of A047389. - Bruno Berselli, Dec 28 2017

Crossrefs

Third row of A092260.
Subsequence of A061641; complement of A047263; bisection of A047241.
Cf. A000225. - Loren Pearson, Jul 02 2009
Cf. A020639. - Zak Seidov, Apr 29 2015
Odd numbers in A355200.

Programs

Formula

a(n) = 3*(2*n + 1) = 3*A005408(n), odd multiples of 3.
A008615(a(n)) = n. - Reinhard Zumkeller, Feb 27 2008
A157176(a(n)) = A103333(n+1). - Reinhard Zumkeller, Feb 24 2009
a(n) = 12*n - a(n-1) for n>0, a(0)=3. - Vincenzo Librandi, Nov 20 2010
G.f.: 3*(1+x)/(1-x)^2. - Mario C. Enriquez, Dec 14 2016
E.g.f.: 3*(1 + 2*x)*exp(x). - G. C. Greubel, Sep 18 2019
Sum_{n>=0} (-1)^n/a(n) = Pi/12 (A019679). - Amiram Eldar, Dec 10 2021
From Amiram Eldar, Nov 22 2024: (Start)
Product_{n>=0} (1 - (-1)^n/a(n)) = sqrt(2)/2 (A010503).
Product_{n>=0} (1 + (-1)^n/a(n)) = sqrt(3/2) (A115754). (End)
a(n) = (n+2)^2 - (n-1)^2. - Alexander Yutkin, Mar 15 2025

A169634 a(n) = 3*7^n.

Original entry on oeis.org

3, 21, 147, 1029, 7203, 50421, 352947, 2470629, 17294403, 121060821, 847425747, 5931980229, 41523861603, 290667031221, 2034669218547, 14242684529829, 99698791708803, 697891541961621, 4885240793731347, 34196685556119429, 239376798892836003, 1675637592249852021
Offset: 0

Views

Author

Klaus Brockhaus, Apr 04 2010

Keywords

Comments

Essentially first differences of A120741.
Binomial transform of A169604.
Second binomial transform of A005053 without initial term 1.
Inverse binomial transform of A103333 without initial term 1.
Second inverse binomial transform of A013708.
Except for first term 3, these are the integers that satisfy phi(n) = 4*n/7. - Michel Marcus, Jul 14 2015
Number of distinct quadratic residues (QR) over Z_7^n such that gcd(QR, 7^n) = 1 where n >= 1. - Param Mayurkumar Parekh, Feb 11 2023

Crossrefs

Cf. A120741, A169604 (3*6^n), A005053 (expand (1-2x)/(1-5x)), A103333 (expand (1-5x)/(1-8x)), A013708 (3^(2*n+1)), A007283 (3*2^n), A164346 (3*4^n).

Programs

  • Magma
    [ 3*7^n: n in [0..19] ];
  • Mathematica
    3*7^Range[0, 25] (* Paolo Xausa, Jan 17 2025 *)

Formula

a(n) = 7*a(n-1) for n > 0; a(0) = 3.
G.f.: 3/(1-7*x).

A157176 a(n+1) = a(n - n mod 2) + a(n - n mod 3), a(0) = 1.

Original entry on oeis.org

1, 2, 2, 3, 5, 8, 8, 16, 16, 24, 40, 64, 64, 128, 128, 192, 320, 512, 512, 1024, 1024, 1536, 2560, 4096, 4096, 8192, 8192, 12288, 20480, 32768, 32768, 65536, 65536, 98304, 163840, 262144, 262144, 524288, 524288, 786432, 1310720, 2097152, 2097152, 4194304, 4194304
Offset: 0

Views

Author

Reinhard Zumkeller, Feb 24 2009

Keywords

Crossrefs

Programs

  • Mathematica
    LinearRecurrence[{0,0,0,0,0,8},{1, 2, 2, 3, 5, 8},45] (* Stefano Spezia, May 29 2024 *)

Formula

a(n+6) = 8*a(n).
a(6*k) = 8^k; a(A008588(n))=A001018(n);
a(6*k+1) = a(6*k+2) = 2*8^k; a(A016921(n))=a(A016933(n))=A013730(n);
a(6*k+3) = 3*8^k; a(A016945(n))=A103333(n+1);
a(6*k+4) = 5*8^k; a(A016957(n))=A067412(n+1);
a(6*k+5) = 8^(k+1); a(A016969(n))=A001018(n+1).
G.f.: (1 + 2*x + 2*x^2 + 3*x^3 + 5*x^4 + 8*x^5)/((1 - 2*x^2)*(1 + 2*x^2 + 4*x^4)). - Stefano Spezia, May 29 2024

Extensions

a(43)-a(44) from Stefano Spezia, May 29 2024

A083713 a(n) = (8^n - 1)*3/7.

Original entry on oeis.org

0, 3, 27, 219, 1755, 14043, 112347, 898779, 7190235, 57521883, 460175067, 3681400539, 29451204315, 235609634523, 1884877076187, 15079016609499, 120632132875995, 965057063007963, 7720456504063707, 61763652032509659
Offset: 0

Views

Author

Klaus Brockhaus, Jun 14 2003

Keywords

Comments

Fixed points of the mapping defined by A067585. In binary these numbers show a regular pattern: 0, 11, 11011, 11011011, 11011011011, etc.
From Reinhard Zumkeller, Feb 22 2010: (Start)
a(n) = A173593(6*n-5) for n > 0:
terms of A173593 beginning and ending with digits '11' in binary representation;
for n > 0: a(n) = A033129(3*n-1); a(n) - a(n-1) = A103333(n). (End)

Examples

			From _Zerinvary Lajos_, Jan 14 2007: (Start)
Octal..........decimal:
0....................0
3....................3
33..................27
333................219
3333..............1755
33333............14043
333333..........112347
3333333.........898779
33333333.......7190235
333333333.....57521883
3333333333...460175067
etc. (End)
		

Crossrefs

Programs

  • Mathematica
    (3/7)(8^Range[0,20]-1) (* or *) LinearRecurrence[{9,-8},{0,3},30] (* or *) NestList[8#+3&,0,30] (* Harvey P. Dale, Jun 06 2013 *)
  • PARI
    a(n)=(8^n-1)*3/7 \\ Charles R Greathouse IV, Oct 07 2015

Formula

a(n) = 3*A023001(n).
Recursion: a(0) = 0, a(n+1) = (((a(n)*2)*2+1)*2+1).
a(n) = 8*a(n-1) + 3 (with a(0)=0). - Vincenzo Librandi, Aug 08 2010
a(0)=0, a(1)=3, a(n) = 9*a(n-1) - 8*a(n-2). - Harvey P. Dale, Jun 06 2013
From Stefano Spezia, Feb 23 2025: (Start)
G.f.: 3*x/((1 - x)*(1 - 8*x)).
E.g.f.: 3*exp(x)*(exp(7*x) - 1)/7. (End)

A184694 T(n,k)=1/3 the number of nXk 0..2 arrays with no element equal both to the element above and to the element to its left.

Original entry on oeis.org

1, 3, 3, 9, 24, 9, 27, 192, 192, 27, 81, 1536, 4080, 1536, 81, 243, 12288, 86688, 86688, 12288, 243, 729, 98304, 1841856, 4890528, 1841856, 98304, 729, 2187, 786432, 39133824, 275895264, 275895264, 39133824, 786432, 2187, 6561, 6291456
Offset: 1

Views

Author

R. H. Hardin Jan 20 2011

Keywords

Comments

Table starts
.....1.........3.............9.................27.....................81
.....3........24...........192...............1536..................12288
.....9.......192..........4080..............86688................1841856
....27......1536.........86688............4890528..............275895264
....81.....12288.......1841856..........275895264............41325395328
...243.....98304......39133824........15564399648..........6189975781728
...729....786432.....831474432.......878052505824........927173138866560
..2187...6291456...17666296320.....49534593003552.....138877768818516672
..6561..50331648..375354928128...2794452367733472...20801977386689522208
.19683.402653184.7975147677696.157646678048909856.3115849763962378244064

Examples

			Some solutions for 4X3 with a(1,1)=0
..0..2..2....0..1..2....0..1..1....0..2..1....0..1..0....0..2..1....0..1..0
..2..1..0....2..1..2....0..1..2....0..1..2....1..2..0....1..2..1....0..2..0
..2..0..1....2..1..0....2..0..0....0..1..0....1..2..1....2..1..2....1..1..0
..1..0..0....0..1..0....0..1..0....0..2..2....2..0..1....0..1..1....0..0..1
		

Crossrefs

Column 1 is A000244(n-1)
Column 2 is A103333

A169604 a(n) = 3*6^n.

Original entry on oeis.org

3, 18, 108, 648, 3888, 23328, 139968, 839808, 5038848, 30233088, 181398528, 1088391168, 6530347008, 39182082048, 235092492288, 1410554953728, 8463329722368, 50779978334208, 304679870005248, 1828079220031488, 10968475320188928, 65810851921133568, 394865111526801408
Offset: 0

Views

Author

Klaus Brockhaus, Apr 04 2010

Keywords

Comments

a(n) = A081341(n+1).
Essentially first differences of A125682.
Binomial transform of A005053 without initial term 1.
Second binomial transform of A164346.
Inverse binomial transform of A169634.
Second inverse binomial transform of A103333 without initial term 1.
Contribution from Reinhard Zumkeller, May 02 2010: (Start)
a(n) = 3*A000400(n) = A000400(n+1)/2;
subsequence of A003586; a(n)=A003586(A014105(n)) for n<6. (End)

Crossrefs

Cf. A081341, A125682 ((6^n-1)*3/5), A005053 (expand (1-2x)/(1-5x)), A164346 (3*4^n), A169634 (3*7^n), A103333 (expand (1-5x)/(1-8x)).

Programs

Formula

a(n) = 6*a(n-1) for n > 0; a(0) = 3.
G.f.: 3/(1-6*x).

A103334 Number of closed walks of length 2n at any of the nodes of degree 1 on the graph of the (7,4) Hamming code.

Original entry on oeis.org

1, 1, 4, 24, 176, 1376, 10944, 87424, 699136, 5592576, 44739584, 357914624, 2863312896, 22906494976, 183251943424, 1466015514624, 11728124051456, 93824992280576, 750599937982464, 6004799503335424, 48038396025634816
Offset: 0

Views

Author

Paul Barry, Jan 31 2005

Keywords

Comments

a(n+1)=8^n/3+2^(n+1)/3 with g.f. (1-6x)/(1-10x+16x^2) counts walks of length 2n+1 between adjacent nodes of degrees 1 and 4 on the graph of the (7,4) Hamming code.

References

  • David J.C. Mackay, Information Theory, Inference and Learning Algorithms, CUP, 2003, p. 19.

Crossrefs

Formula

G.f.: (1-9x+10x^2)/(1-10x+16x^2); a(n)=8^(n-1)/3+2^(n)/3+5*0^n/8.

A122552 a(0)=a(1)=a(2)=1, a(n) = a(n-1) + a(n-2) + 2*a(n-3) for n > 2.

Original entry on oeis.org

1, 1, 1, 4, 7, 13, 28, 55, 109, 220, 439, 877, 1756, 3511, 7021, 14044, 28087, 56173, 112348, 224695, 449389, 898780, 1797559, 3595117, 7190236, 14380471, 28760941, 57521884, 115043767, 230087533, 460175068, 920350135, 1840700269, 3681400540
Offset: 0

Views

Author

Philippe Deléham, Sep 20 2006

Keywords

Comments

Equals INVERT transform of (1, 0, 3, 0, 3, 0, 3, ...). - Gary W. Adamson, Apr 27 2009
No term is divisible by 3. - Vladimir Joseph Stephan Orlovsky, Mar 24 2011
For n > 3, a(n) is the number of quaternary sequences of length n-1 starting with q(0) = 0, in which all triples (q(i), q(i+1), q(i+2)) contain digits 0 and 3; cf. A294627. - Wojciech Florek, Jul 30 2018
For n > 0, a(n) is the number of ways to tile a strip of length n with squares, dominoes, and two colors of trominoes, with the restriction that the first tile cannot be a domino. - Greg Dresden and Bora Bursalı, Aug 31 2023

Examples

			It is shown in A294627 that there are 42 quaternary sequences (i.e., build from four digits 0, 1, 2, 3) and having both 0 and 3 in every (consecutive) triple. Only a(5=4+1) = 13 of them start with 0: 003x, 030x, 03y0, 0y30, 0330, where x = 0, 1, 2, 3 and y = 1, 2.
		

Crossrefs

Cf. A294627.

Programs

  • GAP
    a:=[1,1,1];; for n in [4..40] do a[n]:=a[n-1]+a[n-2]+2*a[n-3]; od; a; # Muniru A Asiru, Jul 30 2018
  • Maple
    seq(coeff(series((1-x^2)/(1-x-x^2-2*x^3), x,n+1),x,n),n=0..40); # Muniru A Asiru, Aug 02 2018
  • Mathematica
    LinearRecurrence[{1, 1, 2}, {1, 1, 1}, 40]
    CoefficientList[ Series[(x^2 - 1)/(2x^3 + x^2 + x - 1), {x, 0, 35}], x] (* Robert G. Wilson v, Jul 30 2018 *)
  • PARI
    Vec((1-x^2)/(1-x-x^2-2*x^3)+O(x^99)) \\ Charles R Greathouse IV, Jan 17 2012
    
  • Sage
    from sage.combinat.sloane_functions import recur_gen3; it = recur_gen3(1,1,1,1,1,2); [next(it) for i in range(30)] # Zerinvary Lajos, Jun 25 2008
    

Formula

a(3*n) = 2*a(3*n-1)+2, a(3*n+1) = 2*a(3*n)-1, a(3*n+2) = 2*a(3*n+1)-1, a(0)=1.
G.f.: (1-x^2)/(1-x-x^2-2*x^3).
a(n) = ((-1)^n*A130815(n+2) + 3*2^n)/7. - R. J. Mathar, Nov 30 2008
From Paul Curtz, Oct 02 2009: (Start)
a(n) = A140295(n+2)/4.
a(n+1) - 2a(n) = period 3: repeat -1,-1,2 = -A061347.
a(n) - a(n-1) = 0,0,3,3,6,15,27,54,111,... = 3*A077947.
a(n) - a(n-2) = 0,3,6,9,21,42,81,....
a(n) - a(n-3) = 3,6,12,24,... = A007283 = 3*A000079.
a(3n) + a(3n+1) + a(3n+2) = 3,24,192,... = A103333(n+1) = A140295(3n) + A140295(3n+1) + A140295(3n+2).
See A078010, A139217, A139218. (End)

Extensions

Corrected by T. D. Noe, Nov 01 2006, Nov 07 2006
Typo in definition corrected by Paul Curtz, Oct 02 2009

A174971 Periodic sequence: Repeat 3, -3.

Original entry on oeis.org

3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3, 3, -3
Offset: 0

Views

Author

Klaus Brockhaus, Apr 04 2010

Keywords

Comments

Interleaving of A010701 and -A010701; signed version of A010701.
Essentially first differences of A010674.
Inverse binomial transform of 3 followed by A000004.
Second inverse binomial transform of A010701.
Third inverse binomial transform of A007283.
Fourth inverse binomial transform of A000244 without initial term 1.
Fifth inverse binomial transform of A164346.
Sixth inverse binomial transform of A005053 without initial term 1.
Seventh inverse binomial transform of A169604.
Eighth inverse binomial transform of A169634.
Ninth inverse binomial transform of A103333 without initial term 1.
Tenth inverse binomial transform of A013708.
Eleventh inverse binomial transform of A093138 without initial term 1.

Crossrefs

Cf. A010701 (all 3's sequence), A000004 (all zeros sequence), A007283 (3*2^n), A000244 (powers of 3), A164346 (3*4^n), A005053 (expand (1-2x)/(1-5x)), A169604 (3*6^n), A169634 (3*7^n), A103333 (expand (1-5x)/(1-8x)), A013708 (3^(2n+1)), A093138 (expand (1-7x)/(1-10x)).

Programs

  • Magma
    &cat[ [3, -3]: n in [0..41] ];
    [ 3*(-1)^n: n in [0..83] ];
    
  • Mathematica
    PadRight[{},120,{3,-3}] (* or *) NestList[-1#&,3,120] (* Harvey P. Dale, Dec 30 2023 *)
  • PARI
    a(n)=3*(-1)^n \\ Charles R Greathouse IV, Jun 13 2013

Formula

a(n) = 3*(-1)^n.
a(n) = -a(n-1) for n > 0; a(0) = 3.
a(n) = a(n-2) for n > 1; a(0) = 3, a(1) = -3.
G.f.: 3/(1+x).
Showing 1-10 of 10 results.