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

A045805 5-ish numbers (end in 51, 57, 93, 99).

Original entry on oeis.org

51, 57, 93, 99, 151, 157, 193, 199, 251, 257, 293, 299, 351, 357, 393, 399, 451, 457, 493, 499, 551, 557, 593, 599, 651, 657, 693, 699, 751, 757, 793, 799, 851, 857, 893, 899, 951, 957, 993, 999, 1051, 1057, 1093, 1099, 1151, 1157, 1193, 1199, 1251, 1257
Offset: 1

Views

Author

Keywords

Crossrefs

Programs

  • Haskell
    import Data.List (findIndices)
    a045805 n = a045805_list !! (n-1)
    a045805_list = findIndices (`elem` [51,57,93,99]) $ cycle [0..99]
    -- Reinhard Zumkeller, Jan 23 2012
  • Mathematica
    Select[Range[50,1500],MemberQ[{51,57,93,99},Mod[#,100]]&] (* Harvey P. Dale, Nov 14 2022 *)

Formula

Empirical g.f.: x*(51+6*x+36*x^2+6*x^3+x^4)/(1-x-x^4+x^5). - Colin Barker, Jan 23 2012

Extensions

More terms from Erich Friedman

A045806 6-ish numbers (end in 23, 27, 61, 89).

Original entry on oeis.org

23, 27, 61, 89, 123, 127, 161, 189, 223, 227, 261, 289, 323, 327, 361, 389, 423, 427, 461, 489, 523, 527, 561, 589, 623, 627, 661, 689, 723, 727, 761, 789, 823, 827, 861, 889, 923, 927, 961, 989, 1023, 1027, 1061, 1089, 1123, 1127, 1161, 1189, 1223, 1227
Offset: 1

Views

Author

Keywords

Crossrefs

Programs

  • Haskell
    import Data.List (findIndices)
    a045806 n = a045806_list !! (n-1)
    a045806_list = findIndices (`elem` [23,27,61,89]) $ cycle [0..99]
    -- Reinhard Zumkeller, Jan 23 2012

Formula

Empirical g.f.: x*(23+4*x+34*x^2+28*x^3+11*x^4)/(1-x-x^4+x^5). - Colin Barker, Jan 23 2012

Extensions

More terms from Erich Friedman

A045807 7-ish numbers (end in 53, 71, 79, 97).

Original entry on oeis.org

53, 71, 79, 97, 153, 171, 179, 197, 253, 271, 279, 297, 353, 371, 379, 397, 453, 471, 479, 497, 553, 571, 579, 597, 653, 671, 679, 697, 753, 771, 779, 797, 853, 871, 879, 897, 953, 971, 979, 997, 1053, 1071, 1079, 1097, 1153, 1171, 1179, 1197, 1253, 1271
Offset: 1

Views

Author

Keywords

Crossrefs

Programs

  • Haskell
    import Data.List (findIndices)
    a045807 n = a045807_list !! (n-1)
    a045807_list = findIndices (`elem` [53,71,79,97]) $ cycle [0..99]
    -- Reinhard Zumkeller, Jan 23 2012

Formula

Empirical g.f.: x*(53+18*x+8*x^2+18*x^3+3*x^4)/(1-x-x^4+x^5). - Colin Barker, Jan 23 2012

Extensions

More terms from Erich Friedman
Previous Showing 11-13 of 13 results.