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 A132858 #14 Feb 24 2020 08:08:18 %S A132858 4,6,8,9,10,14,15,16,18,20,21,22,25,26,27,28,32,33,34,35,38,39,42,44, %T A132858 46,49,50,51,52,54,55,57,58,62,64,65,66,68,69,74,75,76,77,78,81,82,85, %U A132858 86,87,88,91,92,93,94,95,98,99,100,102,104,106,110,111,114,115,116,117,118 %N A132858 Composite "antimutinous" numbers. An antimutinous number is an integer m > 1 where m/p^k < p, where p is the largest prime divisor of m and p^k is the largest power of p dividing m. %C A132858 {a(k)-1} is the complement of sequence A056077. In other words, {a(k)} contains precisely those positive integers m where A001142(m-1) (= product{k=1 to m-1} k^(2k-m)) is not divisible by all primes <= m-1. %H A132858 Amiram Eldar, <a href="/A132858/b132858.txt">Table of n, a(n) for n = 1..10000</a> %t A132858 antiQ[n_] := Module[{f = FactorInteger[n], p, k}, p = f[[-1, 1]]; k = f[[-1, 2]]; n/p^k < p]; Select[Range[118], CompositeQ[#] && antiQ[#] &] (* _Amiram Eldar_, Feb 24 2020 *) %Y A132858 Cf. A027855, A132982, A027854, A056077, A001142. %K A132858 nonn %O A132858 1,1 %A A132858 _Leroy Quet_, Nov 21 2007 %E A132858 Extended by _Ray Chandler_, Nov 17 2008