A054889 -id:A054889 - cp's OEIS frontend

A054888 Layer counting sequence for hyperbolic tessellation by regular pentagons of angle Pi/2.

1, 5, 15, 40, 105, 275, 720, 1885, 4935, 12920, 33825, 88555, 231840, 606965, 1589055, 4160200, 10891545, 28514435, 74651760, 195440845, 511670775, 1339571480, 3507043665, 9181559515, 24037634880, 62931345125

Offset: 0

Paolo Dominici (pl.dm(AT)libero.it), May 23 2000

The layer sequence is the sequence of the cardinalities of the layers accumulating around a (finite-sided) polygon of the tessellation under successive side-reflections.

Reinhard Zumkeller, Table of n, a(n) for n = 0..999 (indices corrected to start at zero by _Sidney Cadot_, Jan 07 2022)
Paolo Dominici, Illustration
Index entries for Coordination Sequences [A layer sequence is a kind of coordination sequence. - _N. J. A. Sloane_, Nov 20 2022]
Index entries for linear recurrences with constant coefficients, signature (3,-1).

Cf. A000045, A001906, A002878, A004277, A203976.

Cf. A054886, A054887, A054889, A054890.

a054888 n = a054888_list !! (n-1)
a054888_list = 1 : zipWith (+) (tail a002878_list) a002878_list
-- Reinhard Zumkeller, Jan 11 2012

[n eq 0 select 1 else 5*Fibonacci(2*n): n in [0..40]]; // G. C. Greubel, Feb 08 2023

LinearRecurrence[{3,-1},{1,5,15},30] (* Harvey P. Dale, Jan 15 2023 *)
Join[{1}, 5*Fibonacci[2*Range[40]]] (* G. C. Greubel, Feb 08 2023 *)

{a(n)=polcoeff(exp(sum(k=1,n,5*fibonacci(k)^2*x^k/k)+x*O(x^n)), n)} /* Paul D. Hanna, Feb 21 2012 */

[5*fibonacci(2*n) + int(n==0) for n in range (41)] # G. C. Greubel, Feb 08 2023

a(n) = 5*A001906(n) + [n=0].
G.f.: (1+x)^2/(1-3*x+x^2).
G.f.: exp( Sum_{n>=1} 5*Fibonacci(n)^2 * x^n/n ). - Paul D. Hanna, Feb 21 2012
a(n) = A001906(n-1) + 2*A001906(n) + A001906(n+1). - R. J. Mathar, Nov 28 2011
a(n) = A203976(A004277(n-1)). - Reinhard Zumkeller, Jan 11 2012
a(n) = 5*A000045(2*n) for n >= 1. - Robert Israel, Jun 01 2015
a(n) = A002878(n-1)+A002878(n). - R. J. Mathar, Jul 09 2024

Offset changed to 0 by N. J. A. Sloane, Jan 03 2022 at the suggestion of Michel Marcus

A054890 Layer counting sequence for hyperbolic tessellation by regular heptagons of angle Pi/3.

Original entry on oeis.org

1, 7, 42, 245, 1428, 8323, 48510, 282737, 1647912, 9604735, 55980498, 326278253, 1901689020, 11083855867, 64601446182, 376524821225, 2194547481168, 12790760065783, 74550012913530, 434509317415397

Offset: 1

Paolo Dominici (pl.dm(AT)libero.it), May 23 2000

nonn

The layer sequence is the sequence of the cardinalities of the layers accumulating around a (finite-sided) polygon of the tessellation under successive side-reflections; see the illustration accompanying A054888.

Michael De Vlieger, Table of n, a(n) for n = 1..1307
Hacène Belbachir, Soumeya Merwa Tebtoub, and László Németh, Ellipse Chains and Associated Sequences, J. Int. Seq., Vol. 23 (2020), Article 20.8.5.
Index entries for Coordination Sequences [A layer sequence is a kind of coordination sequence. - _N. J. A. Sloane_, Nov 20 2022]
Index entries for linear recurrences with constant coefficients, signature (6,-1).

Cf. A001109, A054886, A054887, A054888, A054889.

[n eq 1 select 1 else 7*Evaluate(ChebyshevSecond(n-1), 3): n in [1..40]]; // G. C. Greubel, Feb 08 2023

Rest@CoefficientList[Series[x*(1+x+x^2)/(1-6*x+x^2), {x,0,30}], x] (* Michael De Vlieger, Dec 29 2020 *)
LinearRecurrence[{6,-1},{1,7,42},20] (* Harvey P. Dale, Jun 06 2021 *)

[7*chebyshev_U(n-2, 3) + int(n==1) for n in range(1,41)] # G. C. Greubel, Feb 08 2023

a(n) = 7*A001109(n-1) + [n=1].
G.f.: x*(1+x+x^2)/(1-6*x+x^2).
a(n) = A001109(n) + A001109(n-1) + A001109(n-2), n>1. - Ralf Stephan, Apr 26 2003

cp's OEIS Frontend

A054888 Layer counting sequence for hyperbolic tessellation by regular pentagons of angle Pi/2.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Haskell

Magma

Mathematica

PARI

SageMath

Formula

Extensions