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

A003666 a(n) is smallest number which is uniquely of the form a(j) + a(k) with 1 <= j < k < n and a(1) = 1, a(2) = 4.

Original entry on oeis.org

1, 4, 5, 6, 7, 8, 10, 16, 18, 19, 21, 31, 32, 33, 42, 46, 56, 57, 66, 70, 79, 82, 91, 96, 104, 105, 107, 116, 129, 130, 131, 141, 158, 165, 168, 179, 180, 182, 191, 204, 205, 206, 216, 217, 218, 219, 229, 230, 244, 256, 266, 267, 268, 281, 290, 315, 316, 317, 318, 328
Offset: 1

Views

Author

N. J. A. Sloane, Mira Bernstein

Keywords

Comments

An Ulam-type sequence - see A002858 for many further references, comments, etc. - T. D. Noe, Jan 21 2008

References

  • R. K. Guy, "s-Additive sequences", preprint, 1994.
  • N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).

Links

Crossrefs

Cf. A003662, A199120, A199121.

Programs

  • Haskell
    a003666 n = a003666_list !! (n-1)
a003666_list = 1 : 4 : ulam 2 4 a003666_list
-- Function ulam as defined in A002858.
-- Reinhard Zumkeller, Nov 03 2011
  • Mathematica
    Nest[Append[#, SelectFirst[Union@ Select[Tally@ Map[Total, Select[Permutations[#, {2}], #1 < #2 & @@ # &]], Last@ # == 1 &][[All, 1]], Function[k, FreeQ[#, k]]]] &, {1, 4}, 58] (* Michael De Vlieger, Nov 16 2017 *)

A199017 Number of partitions of n into distinct terms of (1,2)-Ulam sequence, cf. A002858.

Original entry on oeis.org

1, 1, 1, 2, 2, 2, 3, 3, 3, 4, 4, 5, 5, 6, 7, 7, 8, 9, 10, 11, 12, 13, 14, 14, 16, 16, 17, 19, 20, 22, 23, 25, 26, 27, 29, 30, 31, 34, 35, 38, 40, 41, 45, 45, 48, 51, 52, 57, 60, 62, 66, 68, 71, 75, 78, 83, 86, 93, 97, 100, 107, 109, 115, 120, 124, 132, 138
Offset: 0

Views

Author

Reinhard Zumkeller, Nov 03 2011

Keywords

Examples

			The first terms of A002858 are 1, 2, 3, 4, 6, 8, 11, 13, 16, 18, ...
a(10) = #{8+2, 6+4, 6+3+1, 4+3+2+1} = 4;
a(11) = #{11, 8+3, 8+2+1, 6+4+1, 6+3+2} = 5;
a(12) = #{11+1, 8+4, 8+3+1, 6+4+2, 6+3+2+1} = 5.

Links

Crossrefs

Cf. A000586; A199016, A199119, A199121, A199123.

Programs

  • Haskell
    a199017 = p a002858_list where
   p _  0 = 1
   p (u:us) m | m < u = 0
              | otherwise = p us (m - u) + p us m

A199119 Number of partitions of n into distinct terms of (1,3)-Ulam sequence, cf. A002859.

Original entry on oeis.org

1, 1, 0, 1, 2, 2, 2, 2, 3, 4, 4, 4, 5, 6, 6, 7, 7, 8, 10, 9, 9, 12, 13, 13, 13, 14, 17, 18, 18, 19, 21, 23, 25, 26, 27, 30, 33, 33, 36, 40, 42, 43, 45, 51, 55, 55, 57, 62, 67, 71, 72, 76, 82, 87, 91, 95, 100, 107, 112, 116, 124, 132, 137, 143, 151, 159, 170
Offset: 0

Views

Author

Reinhard Zumkeller, Nov 03 2011

Keywords

Examples

			The first terms of A002859 are 1, 3, 4, 5, 6, 8, 10, 12, 17, 21, ...
a(10) = #{10, 6+4, 6+3+1, 5+4+1} = 4;
a(11) = #{10+1, 8+3, 6+5, 6+4+1} = 4;
a(12) = #{12, 8+4, 8+3+1, 6+5+1, 5+4+3} = 5.

Links

Crossrefs

A000586; A199118, A199017, A199121, A199123.

Programs

  • Haskell
    a199119 = p a002859_list where
   p _  0 = 1
   p (u:us) m | m < u = 0
              | otherwise = p us (m - u) + p us m

A199120 Number of partitions of n into terms of (1,4)-Ulam sequence, cf. A003666.

Original entry on oeis.org

1, 1, 1, 1, 2, 3, 4, 5, 7, 8, 11, 13, 17, 20, 25, 30, 38, 44, 54, 63, 77, 90, 107, 124, 148, 171, 202, 231, 271, 310, 360, 412, 477, 542, 622, 705, 809, 915, 1042, 1175, 1335, 1501, 1699, 1905, 2148, 2403, 2702, 3018, 3383, 3768, 4212, 4682, 5223, 5794, 6445
Offset: 0

Views

Author

Reinhard Zumkeller, Nov 03 2011

Keywords

Examples

			The first terms of A003666 are 1, 4, 5, 6, 7, 8, 10, 16, 18, 19, ...
a(7) = #{7, 6+1, 5+1+1, 4+1+1+1, 7x1} = 5;
a(8) = #{8, 7+1, 6+1+1, 5+1+1+1, 4+4, 4+1+1+1+1, 8x1} = 7;
a(9) = #{8+1, 7+1+1, 6+1+1+1, 5+4, 5+1+1+1+1, 4+4+1, 4+5x1, 9x1} = 8.

Links

Crossrefs

Cf. A000607; A199016, A199118, A199121, A199122.

Programs

  • Haskell
    a199120 = p a003666_list where
   p _ 0 = 1
   p us'@(u:us) m | m < u     = 0
                  | otherwise = p us' (m - u) + p us m

A199123 Number of partitions of n into distinct terms of (2,3)-Ulam sequence, cf. A001857.

Original entry on oeis.org

1, 0, 1, 1, 0, 2, 0, 2, 2, 2, 3, 2, 3, 3, 4, 4, 5, 5, 6, 6, 6, 8, 8, 9, 11, 10, 12, 14, 12, 17, 16, 17, 22, 19, 24, 25, 25, 30, 30, 33, 37, 37, 42, 45, 46, 52, 54, 57, 64, 66, 69, 79, 76, 87, 93, 91, 109, 105, 115, 126, 123, 140, 144, 151, 166, 169, 180, 193
Offset: 0

Views

Author

Reinhard Zumkeller, Nov 03 2011

Keywords

Examples

			The first terms of A001857 are 2, 3, 5, 7, 8, 9, 13, 14, 18, 19, 24, ...
a(20) = #{18+2, 13+7, 13+5+2, 9+8+3, 8+7+5, 8+7+3+2} = 6;
a(21) = #{19+2, 18+3, 14+7, 14+5+2, 13+8, 13+5+3, 9+7+5, 9+7+3+2} = 8.

Links

Crossrefs

Cf. A000586; A199122, A199017, A199119, A199121.

Programs

  • Haskell
    a199123 = p a001857_list where
   p _  0 = 1
   p (u:us) m | m < u = 0
              | otherwise = p us (m - u) + p us m
Showing 1-5 of 5 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.