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

A140099 A Beatty sequence: a(n) = [n*(1+t)], where t = tribonacci constant (A058265); complement of A140098.

Original entry on oeis.org

2, 5, 8, 11, 14, 17, 19, 22, 25, 28, 31, 34, 36, 39, 42, 45, 48, 51, 53, 56, 59, 62, 65, 68, 70, 73, 76, 79, 82, 85, 88, 90, 93, 96, 99, 102, 105, 107, 110, 113, 116, 119, 122, 124, 127, 130, 133, 136, 139, 141, 144, 147, 150, 153, 156, 159, 161, 164, 167, 170, 173
Offset: 1

Views

Author

Paul D. Hanna, Jun 01 2008

Keywords

Comments

Note that A276385 agrees with this sequence for n <= 17160 but disagrees beyond that point. In fact a(17161) = 48725, whereas A276385(17161) = 48724. - N. J. A. Sloane, Sep 03 2016
Also somewhat similar to but different from A109232. - N. J. A. Sloane, Sep 04 2016

Examples

			Tribonacci constant: t = 1.839286755214161132551852564653286600...
		

Crossrefs

Cf. A140098 (complement), A140101, A058265, A109232, A276385.
See also A158919 (Beatty sequence for tribonacci constant tau), A275926 (deviation from A140101).

Programs

  • Mathematica
    With[{tc=1/3 (1+Surd[19-3Sqrt[33],3])+1/3 Surd[19+3Sqrt[33],3]},Array[ Floor[ (1+tc)*#]&,70]] (* Harvey P. Dale, Dec 05 2013 *)
  • PARI
    {a(n)=local(t=(1+(19+3*sqrt(33))^(1/3)+(19-3*sqrt(33))^(1/3))/3);floor(n*(1+t))}

Formula

For n >= 1, a(n) = A158919(n)+n. - N. J. A. Sloane, Sep 04 2016

A109231 a(n) = floor(n*cosh(1)).

Original entry on oeis.org

1, 3, 4, 6, 7, 9, 10, 12, 13, 15, 16, 18, 20, 21, 23, 24, 26, 27, 29, 30, 32, 33, 35, 37, 38, 40, 41, 43, 44, 46, 47, 49, 50, 52, 54, 55, 57, 58, 60, 61, 63, 64, 66, 67, 69, 70, 72, 74, 75, 77, 78, 80, 81, 83, 84, 86, 87, 89, 91, 92, 94, 95, 97, 98, 100
Offset: 1

Views

Author

Reinhard Zumkeller, Jun 23 2005

Keywords

Comments

Beatty sequence for cosh(1) = (e+1/e)/2 = 1.54308...= A073743; complement of A109232.

Crossrefs

A109233 Self-inverse integer permutation induced by Beatty sequences for (e+1/e)/2 and (e^2+1)/(e-1)^2.

Original entry on oeis.org

2, 1, 5, 8, 3, 11, 14, 4, 17, 19, 6, 22, 25, 7, 28, 31, 9, 34, 10, 36, 39, 12, 42, 45, 13, 48, 51, 15, 53, 56, 16, 59, 62, 18, 65, 20, 68, 71, 21, 73, 76, 23, 79, 82, 24, 85, 88, 26, 90, 93, 27, 96, 29, 99, 102, 30, 105, 107, 32, 110, 113, 33, 116, 119
Offset: 1

Views

Author

Reinhard Zumkeller, Jun 23 2005

Keywords

Crossrefs

Formula

a(A109231(n))=A109232(n) and a(A109232(n))=A109231(n).
Showing 1-3 of 3 results.