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 A035032 #9 Jul 21 2025 16:08:56 %S A035032 1,2,2,3,3,5,5,7,7,7,7,11,11,13,13,14,14,17,17,19,19,19,19,23,23,23, %T A035032 23,26,26,29,29,31,31,31,31,34,34,37,37,38,38,41,41,43,43,43,43,47,47, %U A035032 47,47,47,47,53,53,53,53,53 %N A035032 For n >= 6, max( prevprime(n), 2*prevprime(floor(n/2))). %D A035032 S. K. Stein and S. Szabo, Algebra and Tiling, MAA Carus Monograph 25, 1994, page 104. %t A035032 Join[{1,2,2,3,3},Table[Max[NextPrime[n,-1],2*NextPrime[Floor[n/2],-1]],{n,6,60}]] (* _Harvey P. Dale_, Jul 21 2025 *) %Y A035032 Cf. A035031. %K A035032 nonn %O A035032 1,2 %A A035032 _N. J. A. Sloane_