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.

A182308 a(n+1) = a(n) + floor(a(n)/7) with a(0) = 7.

Original entry on oeis.org

7, 8, 9, 10, 11, 12, 13, 14, 16, 18, 20, 22, 25, 28, 32, 36, 41, 46, 52, 59, 67, 76, 86, 98, 112, 128, 146, 166, 189, 216, 246, 281, 321, 366, 418, 477, 545, 622, 710, 811, 926, 1058, 1209, 1381, 1578, 1803, 2060, 2354, 2690, 3074, 3513, 4014, 4587, 5242, 5990
Offset: 0

Views

Author

Alex Ratushnyak, Apr 23 2012

Keywords

Crossrefs

Programs

  • Mathematica
    NestList[# + Floor[#/7] &, 7, 100] (* Paolo Xausa, Dec 22 2024 *)
  • Python
    a=7
    for i in range(55):
        print(a, end=',')
        a += a//7

A182307 a(n+1) = a(n) + floor(a(n)/6) with a(0) = 6.

Original entry on oeis.org

6, 7, 8, 9, 10, 11, 12, 14, 16, 18, 21, 24, 28, 32, 37, 43, 50, 58, 67, 78, 91, 106, 123, 143, 166, 193, 225, 262, 305, 355, 414, 483, 563, 656, 765, 892, 1040, 1213, 1415, 1650, 1925, 2245, 2619, 3055, 3564, 4158, 4851, 5659, 6602, 7702, 8985, 10482, 12229, 14267, 16644
Offset: 0

Views

Author

Alex Ratushnyak, Apr 23 2012

Keywords

Crossrefs

Programs

  • Maple
    f:= proc(n) option remember;  floor(procname(n-1)*7/6) end proc:
    f(0):= 6:
    map(f, [$0..100]); # Robert Israel, Dec 22 2024
  • Mathematica
    NestList[# + Floor[#/6] &, 6, 100] (* Paolo Xausa, Dec 22 2024 *)
  • Python
    a=6
    for i in range(55):
        print(a, end=', ')
        a += a//6

A182361 a(n+1) = a(n) + floor(a(n)/8) with a(0)=8.

Original entry on oeis.org

8, 9, 10, 11, 12, 13, 14, 15, 16, 18, 20, 22, 24, 27, 30, 33, 37, 41, 46, 51, 57, 64, 72, 81, 91, 102, 114, 128, 144, 162, 182, 204, 229, 257, 289, 325, 365, 410, 461, 518, 582, 654, 735, 826, 929, 1045, 1175, 1321, 1486, 1671, 1879, 2113, 2377, 2674, 3008
Offset: 0

Views

Author

Alex Ratushnyak, Apr 26 2012

Keywords

Crossrefs

Programs

  • Mathematica
    NestList[#+Floor[#/8]&,8,60] (* Harvey P. Dale, Jun 12 2022 *)
  • Python
    from itertools import islice
    def A182361_gen(): # generator of terms
        a = 8
        while True:
            yield a
            a += a>>3
    A182361_list = list(islice(A182361_gen(),30)) # Chai Wah Wu, Sep 21 2022
Showing 1-3 of 3 results.