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.

A274283 Numbers that are a product of distinct numbers in A022095.

This page as a plain text file.
%I A274283 #4 Jun 18 2016 00:39:59
%S A274283 1,5,6,11,17,28,30,45,55,66,73,85,102,118,140,168,187,191,225,270,308,
%T A274283 309,330,365,438,476,495,500,510,590,708,765,803,809,840,935,955,1122,
%U A274283 1146,1241,1260,1298,1309,1350,1540,1545,1848,1854,2006,2044,2101,2118
%N A274283 Numbers that are a product of distinct numbers in A022095.
%C A274283 See the Comment on distinct-product sequences in A160009.
%H A274283 Clark Kimberling, <a href="/A274283/b274283.txt">Table of n, a(n) for n = 1..1000</a>
%e A274283 30 = 5*6, 330 = 5*6*11.
%t A274283 f[1] = 1; f[2] = 5; z = 32; f[n_] := f[n - 1] + f[n - 2]; f = Table[f[n], {n, 1, z}]; f
%t A274283 s = {1}; Do[s = Union[s, Select[s*f[[i]], # <= f[[z]] &]], {i, z}]; s
%Y A274283 Cf. A160009.
%K A274283 nonn,easy
%O A274283 1,2
%A A274283 _Clark Kimberling_, Jun 17 2016