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.

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

A000981 Numbers beginning with letter 'n' in English.

Original entry on oeis.org

9, 19, 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
Offset: 1

Views

Author

N. J. A. Sloane

Keywords

Links

Crossrefs

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

Programs

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

Extensions

Edited by John Cerkan, Feb 13 2017
Showing 1-3 of 3 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.