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

A217402 Numbers starting with 9.

Original entry on oeis.org

9, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 900, 901, 902, 903, 904, 905, 906, 907, 908, 909, 910, 911, 912, 913, 914, 915, 916, 917, 918, 919, 920, 921, 922, 923, 924, 925, 926, 927, 928, 929, 930, 931, 932, 933, 934, 935, 936, 937, 938, 939, 940, 941, 942
Offset: 1

Views

Author

Jeremy Gardiner, Oct 02 2012

Keywords

Comments

The lower and upper asymptotic densities of this sequence are 1/81 and 1/9, respectively. - Amiram Eldar, Feb 27 2021

Links

Crossrefs

Cf. A000981, A011539.
Subsequences include: A077685, A045715, A106419, A106429, A077334.
Cf. A131835, A217394, A217395, A217397, A217398, A217399, A217400, A217401.

Programs

  • Mathematica
    Select[Range[1000], IntegerDigits[#][[1]] == 9 &] (* T. D. Noe, Oct 02 2012 *)
  • Python
    def A217402(n): return n+(80*10**(len(str(9*n-8))-1))//9 # Chai Wah Wu, Dec 07 2024

Formula

a(n) = n + (80*10^floor(log_10(9*n-8))-8)/9. - Alan Michael Gómez Calderón, May 17 2023

A000867 Numbers beginning with letter 'f' in English.

Original entry on oeis.org

4, 5, 14, 15, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 400, 401, 402, 403, 404, 405, 406, 407, 408, 409, 410, 411, 412, 413, 414, 415, 416, 417, 418, 419, 420, 421, 422, 423, 424, 425, 426, 427, 428, 429, 430, 431, 432
Offset: 1

Views

Author

N. J. A. Sloane

Keywords

Links

Crossrefs

Subsequence of A125299.
Cf. A000865, A000870, A000873, A000981, A006092.

Programs

  • Mathematica
    Select[Range[1000], First[Characters[IntegerName[#,"Words"]]]=="f"&] (* James C. McMahon, Dec 11 2023 *)

Extensions

More terms from John Cerkan, Feb 11 2017

A000870 Numbers beginning with letter 's' in English.

Original entry on oeis.org

6, 7, 16, 17, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 600, 601, 602, 603, 604, 605, 606, 607, 608, 609, 610, 611, 612, 613, 614, 615, 616, 617, 618, 619, 620
Offset: 1

Views

Author

N. J. A. Sloane

Keywords

Links

Crossrefs

Subsequence of A125299.
Cf. A000865, A000867, A000873, A000981, A006092.

Programs

  • Mathematica
    Select[Range[10^3], Function[d, Or[And[Mod[IntegerLength@ #, 3] == 2, MemberQ[{16, 17}, FromDigits@ Take[d, 2]]], MemberQ[{6, 7}, First@ d]]]@ IntegerDigits@ # &] (* Michael De Vlieger, Feb 13 2017 *)

Extensions

Edited by John Cerkan, Feb 13 2017

A000873 Numbers beginning with letter 'e' in English.

Original entry on oeis.org

8, 11, 18, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 800, 801, 802, 803, 804, 805, 806, 807, 808, 809, 810, 811, 812, 813, 814, 815, 816, 817, 818, 819, 820, 821, 822, 823, 824, 825, 826, 827, 828, 829
Offset: 1

Views

Author

N. J. A. Sloane

Keywords

Links

Crossrefs

Subsequence of A000852.
Cf. A000865, A000867, A000870, A000981, A006092.

Programs

  • Mathematica
    Select[Range[10^3], Function[d, Or[And[Mod[IntegerLength@ #, 3] == 2, MemberQ[{11, 18}, FromDigits@ Take[d, 2]]], First@ d == 8]]@ IntegerDigits@ # &] (* Michael De Vlieger, Feb 13 2017 *)

Extensions

Corrected by Sam Alexander (pink2001x(AT)hotmail.com)
Edited by John Cerkan, Feb 13 2017
Showing 1-4 of 4 results.

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

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