cp's OEIS Frontend

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.

A103512 Smallest m such that A001147(n)+m is prime.

This page as a plain text file.
%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