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 A192863 #13 Sep 01 2020 08:55:30 %S A192863 3,5,7,9,11,13,15,17,21,23,25,27,29,31,33,35,39,41,43,45,47,49,53,57, %T A192863 59,61,63,65,67,69,71,75,77,79,81,83,85,87,89,93,95,97,103,105,107, %U A192863 111,113,115,117,119,121,123,125,129,131,133,135,137,139,141,143,147 %N A192863 Lower flat numbers: odd numbers k such that k-1 is a squarefree number times a power of two. %H A192863 Amiram Eldar, <a href="/A192863/b192863.txt">Table of n, a(n) for n = 1..10000</a> %H A192863 Kevin A. Broughan and Zhou Qizhi, <a href="https://doi.org/10.1017/S0004972710000067">Flat primes and thin primes</a>, Bulletin of the Australian Mathematical Society, Vol. 82, No. 2 (2010), pp. 282-292, <a href="http://www.math.waikato.ac.nz/~kab/papers/flatandthin4.pdf">alternative link</a>. %F A192863 a(n) ~ Pi^2/4 * n. %t A192863 Select[Range[3, 150, 2], SquareFreeQ[(# - 1)/2^IntegerExponent[# - 1, 2]] &] (* _Amiram Eldar_, Aug 30 2020 *) %o A192863 (PARI) is(n)=n%2&&issquarefree((n-1)>>valuation(n-1,2)) \\ corrected by _Amiram Eldar_, Aug 30 2020 %Y A192863 Cf. A192861, A192862, A192864. %Y A192863 Cf. A185199 (asymptotic density of this sequence). %K A192863 nonn %O A192863 1,1 %A A192863 _Charles R Greathouse IV_, Jul 11 2011 %E A192863 Data corrected by _Amiram Eldar_, Aug 30 2020