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-4 of 4 results.

A131865 Partial sums of powers of 16.

Original entry on oeis.org

1, 17, 273, 4369, 69905, 1118481, 17895697, 286331153, 4581298449, 73300775185, 1172812402961, 18764998447377, 300239975158033, 4803839602528529, 76861433640456465, 1229782938247303441, 19676527011956855057, 314824432191309680913, 5037190915060954894609
Offset: 0

Views

Author

Reinhard Zumkeller, Jul 22 2007

Keywords

Comments

16 = 2^4 is the growth measure for the Jacobsthal spiral (compare with phi^4 for the Fibonacci spiral). - Paul Barry, Mar 07 2008
Second quadrisection of A115451. - Paul Curtz, May 21 2008
Let A be the Hessenberg matrix of order n, defined by: A[1,j]=1, A[i,i]:=16, (i>1), A[i,i-1]=-1, and A[i,j]=0 otherwise. Then, for n >= 1, a(n-1) = det(A). - Milan Janjic, Feb 21 2010
Partial sums are in A014899. Also, the sequence is related to A014931 by A014931(n+1) = (n+1)*a(n) - Sum_{i=0..n-1} a(i) for n>0. - Bruno Berselli, Nov 07 2012
a(n) is the total number of holes in a certain box fractal (start with 16 boxes, 1 hole) after n iterations. See illustration in links. - Kival Ngaokrajang, Jan 28 2015
Except for 1 and 17, all terms are Brazilian repunits numbers in base 16, and so belong to A125134. All terms >= 273 are composite because a(n) = ((4^(n+1) + 1) * (4^(n+1) - 1))/15. - Bernard Schott, Jun 06 2017
The sequence in binary is 1, 10001, 100010001, 1000100010001, 10001000100010001, ... cf. Plouffe link, A330135. - Frank Ellermann, Mar 05 2020

Examples

			a(3) = 1 + 16 + 256 + 4096 = 4369 = in binary: 1000100010001.
a(4) = (16^5 - 1)/15 = (4^5 + 1) * (4^5 - 1)/15 = 1025 * 1023/15 = 205 * 341 = 69905 = 11111_16. - _Bernard Schott_, Jun 06 2017
		

Crossrefs

Programs

Formula

a(n) = if n=0 then 1 else a(n-1) + A001025(n).
for n > 0: A131851(a(n)) = n and abs(A131851(m)) < n for m < a(n).
a(n) = A098704(n+2)/2.
a(n) = (16^(n+1) - 1)/15. - Bernard Schott, Jun 06 2017
a(n) = (A001025(n+1) - 1)/15.
a(n) = 16*a(n-1) + 1. - Paul Curtz, May 20 2008
G.f.: 1 / ( (16*x-1)*(x-1) ). - R. J. Mathar, Feb 06 2011
E.g.f.: exp(x)*(16*exp(15*x) - 1)/15. - Stefano Spezia, Mar 06 2020

A131852 Imaginary part of the function z defined in A131851.

Original entry on oeis.org

0, 0, 1, 1, 0, 0, 1, 1, -1, -1, 0, 0, -1, -1, 0, 0, 0, 0, 1, 1, 0, 0, 1, 1, -1, -1, 0, 0, -1, -1, 0, 0, 1, 1, 2, 2, 1, 1, 2, 2, 0, 0, 1, 1, 0, 0, 1, 1, 1, 1, 2, 2, 1, 1, 2, 2, 0, 0, 1, 1, 0, 0, 1, 1, 0, 0, 1, 1, 0, 0, 1, 1, -1, -1, 0, 0, -1, -1, 0, 0, 0, 0, 1, 1, 0, 0, 1, 1, -1, -1, 0, 0, -1, -1, 0, 0, 1, 1, 2, 2, 1, 1, 2, 2, 0, 0, 1, 1, 0, 0, 1, 1, 1, 1, 2, 2, 1, 1, 2, 2, 0
Offset: 0

Views

Author

Reinhard Zumkeller, Jul 22 2007

Keywords

Comments

a(A000079(n)) = A056594(n+3);
a(A131855(n)) = 0; a(A131862(n)) > 0; a(A131857(n)) = 1; a(A131864(n)) < 0;
for n > 0: a(A098704(n+1)) = n and abs(a(m)) < n for m < A098704(n+1).

Programs

  • Mathematica
    z[0] = 0; z[n_] := z[n] = z[Floor[n/2]]*I + Mod[n, 2]; Table[z[n] // Im, {n, 0, 120}] (* Jean-François Alcover, Mar 02 2019 *)

A144864 a(n) = (4*16^(n-1)-1)/3.

Original entry on oeis.org

1, 21, 341, 5461, 87381, 1398101, 22369621, 357913941, 5726623061, 91625968981, 1466015503701, 23456248059221, 375299968947541, 6004799503160661, 96076792050570581, 1537228672809129301, 24595658764946068821, 393530540239137101141, 6296488643826193618261, 100743818301219097892181
Offset: 1

Views

Author

Artur Jasinski, Sep 23 2008

Keywords

Comments

Old name was: A144863, read as binary numbers, converted to base 10.
All numbers in this sequence for n>1 are congruent to 5 mod 16. - Artur Jasinski, Sep 25 2008
From Omar E. Pol, Sep 10 2011: (Start)
It appears that this is a bisection of A002450.
It appears that this is a bisection of A084241.
It appears that this is a bisection of A153497.
It appears that this is a bisection of A088556, if n>=2.
(End)
All of the above is trivially true. - Joerg Arndt, Aug 19 2014
The aerated sequence (b(n))n>=1 = [1, 0, 21, 0, 341, 0, 5461, 0, 87381, ...] is a fourth-order linear divisibility sequence; that is, a(n) divides a(m) whenever n divides m. It is the case P1 = 0, P2 = -9, Q = -4 of the 3-parameter family of 4th-order linear divisibility sequences found by Williams and Guy. - Peter Bala, Aug 26 2022

Crossrefs

Third quadrisection of Jacobsthal numbers A001045; the other quadrisections are A195156 (first), A139792 (second), and A141060 (fourth).

Programs

  • Magma
    [16^n/12-1/3: n in [1..20]]; // Vincenzo Librandi, Aug 03 2011
    
  • Mathematica
    Table[1/3 (-1 + 16^(n - 1)) + 16^(n - 1), {n, 1, 17}] (* Artur Jasinski, Sep 25 2008 *)
    LinearRecurrence[{17,-16},{1,21},20] (* Harvey P. Dale, Jun 29 2022 *)
  • PARI
    vector(66,n,(4*16^(n-1)-1)/3) \\ Joerg Arndt, Aug 19 2014

Formula

a(n) = 16^n/12 - 1/3; a(n) = 16*a(n-1) + 5, a(1)=1. - Artur Jasinski, Sep 25 2008
G.f.: x*(1+4*x) / ( (16*x-1)*(x-1) ). - R. J. Mathar, Jan 06 2011
a(n)=b such that Integral_{x=-Pi/2..Pi/2} (-1)^(n+1)*2^(2*n-3)*(cos((2*n-1)*x))/(5/4+sin(x)) dx = c+b*log(3). - Francesco Daddi, Aug 02 2011
a(n) = (2^(4*n-2)-1)/3. - Klaus Purath, Jan 31 2021
From Jianing Song, Aug 30 2022: (Start)
a(n) = A001045(4*n-2).
a(n+1) - a(n) = 10*A013776(n-1) = 20*A001025(n-1) for n >= 1.
a(n) = 10*A098704(n) + 1 = 20*A131865(n-2) + 1 for n >= 2. (End)
E.g.f.: (exp(16*x) - 4*exp(x) + 3)/12. - Stefano Spezia, Apr 18 2024

Extensions

New name from Joerg Arndt, Aug 19 2014

A141060 Fourth quadrisection of Jacobsthal numbers A001045: a(n)=16a(n-1)-5.

Original entry on oeis.org

3, 43, 683, 10923, 174763, 2796203, 44739243, 715827883, 11453246123, 183251937963, 2932031007403, 46912496118443, 750599937895083, 12009599006321323, 192153584101141163, 3074457345618258603, 49191317529892137643
Offset: 0

Views

Author

Paul Curtz, Jul 30 2008

Keywords

Comments

Jacobsthal numbers ending with the decimal digit 3. - Jianing Song, Aug 30 2022

Crossrefs

The other quadrisections of A001045 are A195156 (first), A139792 (second), and A144864 (third).

Programs

Formula

a(n) = A139792(n) + A013776(n).
a(n+1) - a(n) = 10*A013709(n) = 40*A001025(n).
G.f.: (3-8*x)/((1-x)*(1-16*x)). [Colin Barker, Apr 05 2012]
a(0)=3, a(1)=43, a(n)=17*a(n-1)-16*a(n-2). - Harvey P. Dale, Mar 16 2015
From Jianing Song, Aug 30 2022: (Start)
a(n) = A001045(4*n+3).
a(n) = 10*A141032(n) + 3 = 20*A098704(n+1) + 1 = 40*A131865(n-1) + 1 for n >= 1. (End)
Showing 1-4 of 4 results.