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.

A290514 Numbers n such that product of odd divisors of n > product of odd divisors of m for all m < n.

This page as a plain text file.
%I A290514 #5 Aug 07 2017 04:19:55
%S A290514 1,3,5,7,9,15,21,27,33,35,39,45,63,75,99,105,135,165,189,195,225,315,
%T A290514 495,525,585,675,693,735,765,819,825,855,945,1155,1365,1485,1575,2205,
%U A290514 2475,2835,3465,4095,4725,5355,5775,5985,6435,6615,6825,7245,7425,7875,8085,8415,8505,8775,8925,9009,9135,9405
%N A290514 Numbers n such that product of odd divisors of n > product of odd divisors of m for all m < n.
%C A290514 Numbers n such that A136655(n) > A136655(m) for all m < n.
%t A290514 mx = 0; t = {}; Do[u = Product[d, {d, Select[Divisors[n], OddQ[#] &]}]; If[u > mx, mx = u; AppendTo[t, n]], {n, 9500}]; t
%Y A290514 Cf. A034287, A034288, A136655, A174572, A182469.
%K A290514 nonn
%O A290514 1,2
%A A290514 _Ilya Gutkovskiy_, Aug 04 2017