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 A083401 #9 Apr 30 2023 14:07:07 %S A083401 3,4,5,6,15,21,25,27,28,52,70,205,245,308,339,357,415,524,537,1455, %T A083401 1500 %N A083401 Numbers k such that A073605(k) is prime. %C A083401 No other terms below 2200. [_Max Alekseyev_, May 11 2009] %e A083401 a(1)=3 because A073605(3)=7 is prime and A073605(1) and A073605(2) aren't primes. %t A083401 For[k = 0, k < 875, If[PrimeQ[ChineseRemainder[ -Range[k], Prime[Range[k]]]], Print[k]], k++ ] %Y A083401 Cf. A053664, A073605, A053664. %K A083401 nonn,more %O A083401 1,1 %A A083401 _Farideh Firoozbakht_, Jun 07 2003 %E A083401 a(20)-a(21) from _Max Alekseyev_, May 11 2009