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.

Previous Showing 11-20 of 36 results. Next

A325675 First term of n-th difference sequence of (floor(k*r)), r = -sqrt(8), k >= 0.

Original entry on oeis.org

-3, 0, 0, 0, 0, 1, -6, 21, -56, 126, -252, 463, -804, 1365, -2366, 4368, -8736, 18565, -40410, 87381, -184604, 379050, -758100, 1486675, -2884776, 5592405, -10919090, 21572460, -43144920, 87087001, -176565486, 357913941, -723002336, 1453179126, -2906358251
Offset: 1

Views

Author

Clark Kimberling, May 15 2019

Keywords

Links

Crossrefs

Cf. A022842, A325664, A325674.

Programs

  • Mathematica
    Table[First[Differences[Table[Floor[-Sqrt[8]*n], {n, 0, 30}], n]], {n, 0, 50}]

A325665 First term of n-th difference sequence of (floor(k*r)), r = -sqrt(2), k >= 0.

Original entry on oeis.org

-2, 1, -2, 4, -8, 16, -31, 56, -91, 126, -126, 1, 449, -1624, 4249, -9499, 18998, -34356, 55453, -75734, 70889, 26334, -379050, 1352079, -3713651, 9000226, -20136807, 42409969, -84819938, 161567266, -292710631, 501416816, -801992971, 1167081366, -1453179126
Offset: 1

Views

Author

Clark Kimberling, May 12 2019

Keywords

Links

Crossrefs

Cf. A001951, A325664.

Programs

  • Mathematica
    Table[First[Differences[Table[Floor[-Sqrt[2]*n], {n, 0, 50}], n]], {n, 1, 50}]

A325729 First term of n-th difference sequence of (floor(k*r)), r = sqrt(1/2), k >= 0.

Original entry on oeis.org

0, 1, -1, 0, 3, -9, 18, -27, 27, 1, -92, 309, -771, 1716, -3627, 7449, -14897, 28764, -52921, 91239, -143718, 196197, -196197, 0, 737817, -2785484, 7758154, -18894735, 42409968, -89718894, 180879813, -349599492, 650139687, -1166803109, 2028578278
Offset: 1

Views

Author

Clark Kimberling, May 19 2019

Keywords

Links

Crossrefs

Cf. A325664.

Programs

  • Mathematica
    Table[First[Differences[Table[Floor[Sqrt[1/2]*n], {n, 0, 50}], n]], {n, 1, 50}]

A325730 First term of n-th difference sequence of (floor(k*r)), r = sqrt(1/3), k >= 0.

Original entry on oeis.org

0, 1, -2, 4, -8, 16, -31, 56, -91, 126, -126, 0, 462, -1715, 4704, -11319, 25186, -52920, 105840, -201684, 364609, -618772, 964173, -1309574, 1309574, 1, -4970097, 18874639, -52835258, 129107566, -290081057, 612479308, -1227418279, 2343572690, -4261482736
Offset: 1

Views

Author

Clark Kimberling, May 19 2019

Keywords

Links

Crossrefs

Cf. A325664.

Programs

  • Mathematica
    Table[First[Differences[Table[Floor[Sqrt[1/3]*n], {n, 0, 50}], n]], {n, 1, 50}]

A325731 First term of n-th difference sequence of (floor(k*r)), r = sqrt(2/3), k >= 0.

Original entry on oeis.org

0, 1, -1, 1, -1, 0, 5, -20, 55, -125, 250, -450, 725, -1000, 1000, 1, -3642, 13278, -35344, 81720, -174098, 352716, -694904, 1355322, -2652200, 5245956, -10491911, 21097440, -42262518, 83482620, -161013975, 300338820, -536165400, 903201960, -1401448500
Offset: 1

Views

Author

Clark Kimberling, May 20 2019

Keywords

Links

Crossrefs

Cf. A325664. Inverse binomial transform of A171974.

Programs

  • Mathematica
    Table[First[Differences[Table[Floor[Sqrt[2/3]*n], {n, 0, 50}], n]], {n, 1, 50}]

A325732 First term of n-th difference sequence of (floor(k*r)), r = sqrt(3/4), k >= 0.

Original entry on oeis.org

0, 1, -1, 1, -1, 1, -1, 0, 7, -35, 119, -329, 791, -1715, 3430, -6419, 11319, -18767, 28763, -38759, 38759, 1, -149228, 572057, -1615429, 3979001, -9014851, 19251001, -39309301, 77558760, -149239771, 282712561, -532577025, 1008032953, -1934671809, 3787949521
Offset: 1

Views

Author

Clark Kimberling, May 20 2019

Keywords

Links

Crossrefs

Cf. A325664. Inverse binomial Transform of A171970 and A172475.
Cf. A010527 (sqrt(3/4)).

Programs

  • Mathematica
    Table[First[Differences[Table[Floor[Sqrt[3/4]*n], {n, 0, 50}], n]], {n, 1, 50}]

A325733 First term of n-th difference sequence of (floor(k*r)), r = 1/2 + sqrt(2), k >= 0.

Original entry on oeis.org

1, 1, -1, 1, -1, 1, -1, 1, -1, 1, -1, 0, 11, -77, 363, -1364, 4367, -12375, 31823, -75581, 167959, -352715, 705431, -1352078, 2496167, -4457699, 7728759, -13055444, 21572459, -35072309, 56663099, -92561039, 157073279, -286097759, 572195518, -1251677664
Offset: 1

Views

Author

Clark Kimberling, May 20 2019

Keywords

Links

Crossrefs

Cf. A325664. Inverse binomial transform of A137803.

Programs

  • Mathematica
    Table[First[Differences[Table[Floor[(1/2+Sqrt[2])*n], {n, 0, 50}], n]], {n, 1, 50}]

A325734 First term of n-th difference sequence of (floor(k*e)), k >= 0.

Original entry on oeis.org

2, 1, -1, 0, 3, -9, 19, -35, 63, -119, 238, -483, 945, -1715, 2793, -3871, 3871, 0, -14161, 52479, -143717, 345401, -767977, 1613129, -3226258, 6148961, -11119031, 18874261, -29414651, 39955041, -39955041, 0, 151615947, -575723785, 1611404739, -3936821259
Offset: 1

Views

Author

Clark Kimberling, May 20 2019

Keywords

Links

Crossrefs

Cf. A001113, A003417, A325664. Inverse binomial transform of A022843.

Programs

  • Mathematica
    Table[First[Differences[Table[Floor[E*n], {n, 0, 50}], n]], {n, 1, 50}]

A325735 First term of n-th difference sequence of (floor(-k*e)), k >= 0.

Original entry on oeis.org

-3, 0, 0, 1, -4, 10, -20, 36, -64, 120, -239, 484, -946, 1716, -2794, 3872, -3872, 1, 14160, -52478, 143716, -345400, 767976, -1613128, 3226257, -6148960, 11119030, -18874260, 29414650, -39955040, 39955040, 1, -151615948, 575723786, -1611404740, 3936821260
Offset: 1

Views

Author

Clark Kimberling, May 20 2019

Keywords

Comments

Inverse binomial transform of A121384 (values negated). - R. J. Mathar, Jun 17 2019

Links

Crossrefs

Cf. A325664.

Programs

  • Mathematica
    Table[First[Differences[Table[Floor[-E*n], {n, 0, 50}], n]], {n, 1, 50}]

A325736 First term of n-th difference sequence of (floor(2e*k)), k >= 0.

Original entry on oeis.org

5, 0, 1, -3, 7, -15, 31, -63, 126, -245, 455, -791, 1253, -1715, 1715, 0, -6419, 24157, -67081, 162925, -364609, 767977, -1535953, 2922679, -5273325, 8931521, -13886641, 18775981, -18399241, -2035799, 79594559, -300540195, 855744647, -2151510735, 5025003039
Offset: 1

Views

Author

Clark Kimberling, May 23 2019

Keywords

Links

Crossrefs

Cf. A325664.

Programs

  • Mathematica
    Table[First[Differences[Table[Floor[2E*n], {n, 0, 50}], n]], {n, 1, 50}]
Previous Showing 11-20 of 36 results. Next

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.