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.
%I A085129 #13 Sep 23 2024 09:28:03
%S A085129 6,12,18,24,30,36,42,48,54,60,72,84,90,96,108,120,126,144,150,162,168,
%T A085129 180,192,210,216,240,252,270,288,294,300,324,336,360,378,384,420,432,
%U A085129 450,480,486,504,540,576,588,600,630,648,672,720,750,756,768,810,840
%N A085129 Multiples of 6 which are 7-smooth.
%C A085129 Equivalently, multiples of 6 with the largest prime divisor < 10.
%F A085129 From _Amiram Eldar_, Sep 22 2024: (Start)
%F A085129 a(n) = 6*A002473(n).
%F A085129 Sum_{n>=1} 1/a(n) = 35/48. (End)
%t A085129 With[{p = Prime[Range[4]]}, 6 * Select[Range[140], Times @@ (p^IntegerExponent[#, p]) == # &]] (* _Amiram Eldar_, Sep 23 2024 *)
%Y A085129 Intersection of A008588 and A002473.
%Y A085129 Cf. A085125, A085126, A085127, A085128, A080194, A085131, A085132.
%K A085129 nonn,easy
%O A085129 1,1
%A A085129 _Amarnath Murthy_, Jul 06 2003
%E A085129 More terms from _David Wasserman_, Jan 28 2005
%E A085129 Offset changed by _Andrew Howroyd_, Sep 19 2024