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 A103512 #15 Jan 21 2024 15:31:12 %S A103512 1,2,2,2,2,4,16,8,4,64,2,2,8,2,4,118,32,82,178,4,8,4,16,16,298,64,16, %T A103512 194,2,298,316,8,334,32,226,386,4,2,358,8,178,254,206,206,218,8,4,254, %U A103512 452,914,346,2,758,394,362,394,556,422,32,346,1108,394,932,362,604,1382 %N A103512 Smallest m such that A001147(n)+m is prime. %e A103512 A001147(1)=1!!=1, 1+1=2 is prime, so a(1)=1; %e A103512 A001147(2)=3!!=3, 3+2=5 is prime, so a(2)=2; %e A103512 A001147(7)=13!!=135135, 135135+16=135151 is prime, so a(7)=16. %t A103512 Flatten[Table[Select[Range[1500],PrimeQ[(2n-1)!!+#]&,1],{n,66}]] (* _James C. McMahon_, Jan 20 2024 *) %Y A103512 Cf. A103511, A001147. %K A103512 nonn %O A103512 1,2 %A A103512 _Lei Zhou_, Feb 15 2005