The OEIS is supported by the many generous donors to the OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A274453 Products of distinct numbers in A052963. 1
 2, 5, 10, 14, 28, 40, 70, 80, 115, 140, 200, 230, 331, 400, 560, 575, 662, 953, 1120, 1150, 1610, 1655, 1906, 2744, 2800, 3220, 3310, 4600, 4634, 4765, 5488, 5600, 7901, 8050, 9200, 9268, 9530, 13240, 13342, 13720, 15802, 16100, 22750, 23000, 23170, 26480 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Clark Kimberling, Table of n, a(n) for n = 1..10000 EXAMPLE The numbers in A274453 are 1, 2, 5, 14, 40, 115, 331,..., so that the sequence of all products of distinct members, in increasing order, is (2, 5, 10, 14, 28, 40, 70, 80,...). MATHEMATICA r[1] := 1; r[2] := 1; r[3] = 1; r[n_] := r[n] = 3 r[n - 1] - r[n - 3] s = {1}; z = 30; f = Map[r, Range[z]]; Take[f, 20] (* A052963 *) Do[s = Union[s, Select[s*f[[i]], # <= f[[z]] &]], {i, z}]; Take[s, 2 z] (* A274453 *) CROSSREFS Cf. A160009, A274280, A274432, A274452. Sequence in context: A064955 A352189 A101725 * A105370 A173694 A190459 Adjacent sequences: A274450 A274451 A274452 * A274454 A274455 A274456 KEYWORD nonn,easy AUTHOR Clark Kimberling, Jun 23 2016 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified March 28 00:02 EDT 2023. Contains 361575 sequences. (Running on oeis4.)