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 A085231 #14 Jun 02 2025 09:52:26 %S A085231 12,24,40,45,48,56,63,80,96,112,120,135,144,160,168,175,176,189,192, %T A085231 208,224,240,275,280,288,297,315,320,325,336,351,352,360,384,405,416, %U A085231 425,448,459,475,480,504,513,528,539,544,560,567,575,576,608,621,624 %N A085231 Numbers k in whose canonical factorization the power of the smallest prime factor is greater than the power of the greatest prime factor. %C A085231 p*a(n) is a term for all primes p with A020639(a(n)) < p < A006530(a(n)). %H A085231 Harvey P. Dale, <a href="/A085231/b085231.txt">Table of n, a(n) for n = 1..1000</a> %F A085231 A028233(a(n)) > A053585(a(n)). %e A085231 The canonical factorization of 240 is 2^4 * 3 * 5. 2^4 = 16 > 5, therefore 240 is a term. %t A085231 pfgQ[n_]:=Module[{fe=#[[1]]^#[[2]]&/@FactorInteger[n]},fe[[1]]>fe[[-1]]]; Select[Range[700],pfgQ] (* _Harvey P. Dale_, Dec 11 2017 *) %Y A085231 Cf. A006530, A020639, A028233, A053585, A085232, A363122. %Y A085231 A085233 is a subsequence. %Y A085231 Subsequence of A102749. %K A085231 nonn,easy %O A085231 1,1 %A A085231 _Reinhard Zumkeller_, Jun 22 2003 %E A085231 Edited by _Peter Munn_, Jun 01 2025