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 71 results. Next

A118161 Start with 1 and repeatedly reverse the digits and add 55 to get the next term.

Original entry on oeis.org

1, 56, 120, 76, 122, 276, 727, 782, 342, 298, 947, 804, 463, 419, 969, 1024, 4256, 6579, 9811, 1244, 4476, 6799, 10031, 13056, 65086, 68111, 11241, 14266, 66296, 69321, 12451, 15476, 67506, 60631, 13661, 16686, 68716, 61841, 14871, 17896, 69926
Offset: 1

Views

Author

Luc Stevens (lms022(AT)yahoo.com), May 14 2006

Keywords

Comments

After 1371 steps enters a cycle of 36.

Crossrefs

Extensions

a(23) ff. corrected by Georg Fischer, Jul 17 2020

A118162 Start with 1 and repeatedly reverse the digits and add 60 to get the next term.

Original entry on oeis.org

1, 61, 76, 127, 781, 247, 802, 268, 922, 289, 1042, 2461, 1702, 2131, 1372, 2791, 2032, 2362, 2692, 3022, 2263, 3682, 2923, 3352, 2593, 4012, 2164, 4672, 2824, 4342, 2494, 5002, 2065, 5662, 2725, 5332, 2395, 5992, 3055, 5563, 3715, 5233, 3385, 5893, 4045
Offset: 1

Views

Author

Luc Stevens (lms022(AT)yahoo.com), May 14 2006

Keywords

Crossrefs

Programs

  • Mathematica
    NestList[IntegerReverse[#]+60&,1,50] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Aug 10 2017 *)

Formula

Never reaches a cycle (see A117816).

A118217 Start with 1 and repeatedly reverse the digits and add 70 to get the next term.

Original entry on oeis.org

1, 71, 87, 148, 911, 189, 1051, 1571, 1821, 1351, 1601, 1131, 1381, 1901, 1161, 1681, 1931, 1461, 1711, 1241, 1491, 2011, 1172, 2781, 1942, 2561, 1722, 2341, 1502, 2121, 1282, 2891, 2052, 2572, 2822, 2352, 2602, 2132, 2382, 2902, 2162, 2682, 2932, 2462
Offset: 1

Views

Author

Luc Stevens (lms022(AT)yahoo.com), May 14 2006

Keywords

Comments

Never cycles (see A117816).

Crossrefs

Programs

  • Mathematica
    NestList[IntegerReverse[#]+70&,1,50] (* Harvey P. Dale, Sep 11 2023 *)

A118225 Start with 1 and repeatedly reverse the digits and add 74 to get the next term.

Original entry on oeis.org

1, 75, 131, 205, 576, 749, 1021, 1275, 5795, 6049, 9480, 923, 403, 378, 947, 823, 402, 278, 946, 723, 401, 178, 945, 623, 400, 78, 161, 235, 606, 680, 160, 135, 605, 580, 159, 1025, 5275, 5799, 10049, 94075, 57123, 32249, 94297, 79323, 32471, 17497, 79545
Offset: 1

Views

Author

Luc Stevens (lms022(AT)yahoo.com), May 14 2006

Keywords

Comments

After 192 steps enters a cycle of 90.

Crossrefs

Programs

  • Mathematica
    NestList[74+IntegerReverse[#]&,1,50] (* Harvey P. Dale, Jan 05 2022 *)

Extensions

a(14) corrected by Georg Fischer, Jul 17 2020

A118525 Start with 1 and repeatedly reverse the digits and add 6 to get the next term.

Original entry on oeis.org

1, 7, 13, 37, 79, 103, 307, 709, 913, 325, 529, 931, 145, 547, 751, 163, 367, 769, 973, 385, 589, 991, 205, 508, 811, 124, 427, 730, 43, 40, 10, 7, 13, 37, 79, 103, 307, 709, 913, 325, 529, 931, 145, 547, 751, 163, 367, 769, 973, 385, 589, 991
Offset: 1

Views

Author

N. J. A. Sloane, May 06 2006

Keywords

Comments

After the initial term, the sequence enters the cycle (7, 13, 37, ..., 10) of length 30.

Crossrefs

Programs

  • Mathematica
    NestList[FromDigits[Reverse[IntegerDigits[#]]]+6&,1,60]  (* Harvey P. Dale, Apr 22 2011 *)
  • PARI
    a(n,s=1)={n>1&&for(i=0,(n-2)%30,s=R(s)+6);s} \\ R =  A004086. - M. F. Hasler, May 22 2014

Formula

a(n) = a((n-2 mod 30)+2) for all n>1. - M. F. Hasler, May 22 2014

A118526 Start with 1 and repeatedly reverse the digits and add 7 to get the next term.

Original entry on oeis.org

1, 8, 15, 58, 92, 36, 70, 14, 48, 91, 26, 69, 103, 308, 810, 25, 59, 102, 208, 809, 915, 526, 632, 243, 349, 950, 66, 73, 44, 51, 22, 29, 99, 106, 608, 813, 325, 530, 42, 31, 20, 9, 16, 68, 93, 46, 71, 24, 49, 101, 108, 808, 815, 525, 532, 242, 249, 949, 956, 666, 673, 383, 390, 100, 8
Offset: 1

Views

Author

N. J. A. Sloane, May 06 2006

Keywords

Crossrefs

Programs

  • Maple
    a:= proc(n) option remember; `if`(n=1, 1, 7 +(s-> parse(
          cat(seq(s[-i], i=1..length(s)))))(cat("", a(n-1))))
        end:
    seq(a(n), n=1..65);  # Alois P. Heinz, Nov 07 2019

Formula

After 1 step enters a cycle of length 63.

A118527 Start with 1 and repeatedly reverse the digits and add 8 to get the next term.

Original entry on oeis.org

1, 9, 17, 79, 105, 509, 913, 327, 731, 145, 549, 953, 367, 771, 185, 589, 993, 407, 712, 225, 530, 43, 42, 32, 31, 21, 20, 10, 9, 17, 79, 105, 509, 913, 327, 731, 145, 549, 953, 367, 771, 185, 589, 993, 407, 712, 225, 530, 43, 42, 32, 31, 21, 20, 10, 9
Offset: 1

Views

Author

N. J. A. Sloane, May 06 2006

Keywords

Crossrefs

Formula

After 1 step enters a cycle of length 27.

A118528 Start with 1 and repeatedly reverse the digits and add 11 to get the next term.

Original entry on oeis.org

1, 12, 32, 34, 54, 56, 76, 78, 98, 100, 12, 32, 34, 54, 56, 76, 78, 98, 100, 12, 32, 34, 54, 56, 76, 78, 98, 100, 12, 32, 34, 54, 56, 76, 78, 98, 100, 12, 32, 34, 54, 56, 76, 78, 98, 100, 12, 32, 34, 54, 56, 76, 78, 98, 100, 12, 32, 34, 54, 56, 76, 78, 98, 100
Offset: 1

Views

Author

N. J. A. Sloane, May 06 2006

Keywords

Crossrefs

Formula

After 1 step enters a cycle of length 9.

A118530 Start with 1 and repeatedly reverse the digits and add 13 to get the next term.

Original entry on oeis.org

1, 14, 54, 58, 98, 102, 214, 425, 537, 748, 860, 81, 31, 26, 75, 70, 20, 15, 64, 59, 108, 814, 431, 147, 754, 470, 87, 91, 32, 36, 76, 80, 21, 25, 65, 69, 109, 914, 432, 247, 755, 570, 88, 101, 114, 424, 437, 747, 760, 80, 21, 25, 65, 69, 109, 914, 432
Offset: 1

Views

Author

N. J. A. Sloane, May 06 2006

Keywords

Crossrefs

Programs

  • Mathematica
    NestList[FromDigits[Reverse[IntegerDigits[#]]]+13&,1,60] (* Harvey P. Dale, Oct 27 2015 *)

Formula

After 31 steps enters a cycle of length 18.

A118531 Start with 1 and repeatedly reverse the digits and add 14 to get the next term.

Original entry on oeis.org

1, 15, 65, 70, 21, 26, 76, 81, 32, 37, 87, 92, 43, 48, 98, 103, 315, 527, 739, 951, 173, 385, 597, 809, 922, 243, 356, 667, 780, 101, 115, 525, 539, 949, 963, 383, 397, 807, 722, 241, 156, 665, 580, 99, 113, 325, 537, 749, 961, 183, 395, 607, 720
Offset: 1

Views

Author

N. J. A. Sloane, May 06 2006

Keywords

Crossrefs

Programs

  • Mathematica
    NestList[FromDigits[Reverse[IntegerDigits[#]]]+14&,1,60] (* Harvey P. Dale, Jul 11 2013 *)

Formula

After 15 steps enters a cycle of length 72.
Previous Showing 11-20 of 71 results. Next