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

A024581 a(n) = integer nearest e*a(n-1), where a(0) = 1.

Original entry on oeis.org

1, 3, 8, 22, 60, 163, 443, 1204, 3273, 8897, 24185, 65742, 178705, 485771, 1320462, 3589388, 9756968, 26522189, 72094784, 195973941, 532712403, 1448062445, 3936241831, 10699814642, 29085111709, 79061530637, 214911522061, 584190085145
Offset: 0

Views

Author

Keywords

Crossrefs

Equals row sums of triangle A153583. [Gary W. Adamson, Dec 28 2008]

Programs

  • Mathematica
    a[0] = 1; a[n_] := Round[E*a[n - 1]];
    Table[a[n], {n, 0, 30}]
    (* Clark Kimberling, Aug 18 2012 *)
    NestList[Floor[E*#+1/2]&,1,30] (* Harvey P. Dale, Jan 10 2013 *)
  • PARI
    lista(nn) = {nn++; my(va = vector(nn)); va[1] = 1; for (n=2, nn, va[n] = round(exp(1)*va[n-1]);); va;} \\ Michel Marcus, Jan 27 2019

A153582 A024581 / [1,2,3,...].

Original entry on oeis.org

1, 1, 3, 9, 24, 65, 177, 481, 1308, 3555, 9664, 26269, 71406, 194103, 527625, 1434235, 3898654, 10597641, 28807374, 78306562, 212859305, 578611580, 1572829344, 4275393425, 11621724256, 31591121861, 85873572496, 233428571660, 634524644587, 1724816811090, 4688538195006, 12744768177522
Offset: 0

Views

Author

Gary W. Adamson, Dec 28 2008

Keywords

Comments

Convolved with [1, 2, 3, ...] = A024581: (1, 3, 8, 22, 60, 163, ...) (cf. triangle A153583).

Examples

			(1, 1, 3, 9) convolved with (1, 2, 3, 4) = (4 + 3 + 6 + 9 ) = 22 = A024581(3).
		

Crossrefs

Programs

  • PARI
    lista(nn) = {my(va = vector(nn), vc = vector(nn)); va[1] = 1; for (n=1, nn, if (n > 1, va[n] = round(exp(1)*va[n-1])); vc[n] = va[n] - sum(k=1, n-1, vc[k]*(n-k+1));); vc;} \\ Michel Marcus, Jan 27 2019

Formula

A024581 / [1,2,3,...], where A024581 = (1, 3, 8, 22, 60, 163, ...).

Extensions

More terms from Michel Marcus, Jan 27 2019
Showing 1-2 of 2 results.