[go: up one dir, main page]

login
A274283
Numbers that are a product of distinct numbers in A022095.
2
1, 5, 6, 11, 17, 28, 30, 45, 55, 66, 73, 85, 102, 118, 140, 168, 187, 191, 225, 270, 308, 309, 330, 365, 438, 476, 495, 500, 510, 590, 708, 765, 803, 809, 840, 935, 955, 1122, 1146, 1241, 1260, 1298, 1309, 1350, 1540, 1545, 1848, 1854, 2006, 2044, 2101, 2118
OFFSET
1,2
COMMENTS
See the Comment on distinct-product sequences in A160009.
LINKS
EXAMPLE
30 = 5*6, 330 = 5*6*11.
MATHEMATICA
f[1] = 1; f[2] = 5; z = 32; f[n_] := f[n - 1] + f[n - 2]; f = Table[f[n], {n, 1, z}]; f
s = {1}; Do[s = Union[s, Select[s*f[[i]], # <= f[[z]] &]], {i, z}]; s
CROSSREFS
Cf. A160009.
Sequence in context: A277550 A070373 A231000 * A022095 A042531 A042839
KEYWORD
nonn,easy
AUTHOR
Clark Kimberling, Jun 17 2016
STATUS
approved