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 A085132 #14 Sep 23 2024 08:38:42 %S A085132 9,18,27,36,45,54,63,72,81,90,108,126,135,144,162,180,189,216,225,243, %T A085132 252,270,288,315,324,360,378,405,432,441,450,486,504,540,567,576,630, %U A085132 648,675,720,729,756,810,864,882,900,945,972,1008,1080,1125,1134,1152 %N A085132 Multiples of 9 which are 7-smooth. %C A085132 Equivalently, multiples of 9 with the largest prime divisor < 10. %F A085132 From _Amiram Eldar_, Sep 22 2024: (Start) %F A085132 a(n) = 9*A002473(n). %F A085132 Sum_{n>=1} 1/a(n) = 35/72. (End) %t A085132 With[{p = Prime[Range[4]]}, 9 * Select[Range[140], Times @@ (p^IntegerExponent[#, p]) == # &]] (* _Amiram Eldar_, Sep 23 2024 *) %Y A085132 Intersection of A008591 and A002473. %Y A085132 Cf. A085125, A085126, A085127, A085128, A085129, A080194, A085131. %K A085132 nonn,easy %O A085132 1,1 %A A085132 _Amarnath Murthy_, Jul 06 2003 %E A085132 More terms from _David Wasserman_, Jan 28 2005 %E A085132 Offset changed by _Andrew Howroyd_, Sep 19 2024