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 A378136 #18 Jan 08 2025 05:43:37 %S A378136 2,5,13,31,41,71,89,157,179,199,223,293,313,443,479,521,547,647,691, %T A378136 877,929,967,1013,1361,1399,1451,1511,1567,1627,1801,1861,2297,2371, %U A378136 2447,2521,2591,2671,3037,3119,3203,3299,3527,3613,4049,4139,4231,4327,4987,5099 %N A378136 a(n) = p(2*n*p(n)), where p(x) = least prime > x. %e A378136 p(0) = 2, so a(0) = p(2*p(0)) = 5. %t A378136 Table[NextPrime[2 n*NextPrime[n]], {n, 0, 80}] %o A378136 (PARI) p(n) = nextprime(n+1); %o A378136 a(n) = p(2*n*p(n)); \\ _Michel Marcus_, Nov 21 2024 %Y A378136 Cf. A000040, A013636, A151800, A378135. %K A378136 nonn %O A378136 0,1 %A A378136 _Clark Kimberling_, Nov 20 2024