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 A379453 #12 Dec 23 2024 18:01:29 %S A379453 49,64,81,125,128,243,256,289,343,361,512,529,625,729,841,961,1024, %T A379453 1250,1331,1369,1458,1681,1715,1849,1875,2048,2187,2197,2209,2401, %U A379453 2500,2809,2916,3087,3125,3375,3481,3721,4096,4374,4489,4802,4913,5000,5041,5329,5488,5625,5832,6075,6125,6241,6250,6561,6859,6889,7203,7776,7921,8000,8192,8575,8748 %N A379453 Numbers that decrease when they are replaced by the "Look and Say" description (cf. A045918) of their prime factors, counted with multiplicity. %H A379453 Scott R. Shannon, <a href="/A379453/b379453.txt">Table of n, a(n) for n = 1..5000</a> %e A379453 49 is a term as 49 = 7^2 which becomes 27 when replaced by the "Look and Say" description of its prime factors, and 27 is smaller than 49. %t A379453 Select[Range[8750],#>FromDigits[Flatten[IntegerDigits/@Reverse/@FactorInteger[#]]]&] (* _James C. McMahon_, Dec 23 2024 *) %Y A379453 Cf. A045918, A379454, A379455, A005150, A367974, A369132, A369092. %K A379453 nonn,base %O A379453 1,1 %A A379453 _Scott R. Shannon_, Dec 23 2024