|
%I #8 Sep 08 2022 08:45:48
%S 3,11,23,59,83,179,263,419,479,683,839,1103,2243,2663,3119,4703,5099,
%T 5303,5939,11399,12323,19403,22259,25763,27143,28559,33023,34583,
%U 42923,47123,54779,56783,60899,62303,64439,67343,75659,78803,83639,98123
%N Primes of the form (p^2 - 3)/2 where p is also prime.
%C The sequence could be generated by searching for squared primes p^2 in A153238.
%H Vincenzo Librandi, <a href="/A165635/b165635.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) = (A110589(n)^2-3)/2 .
%e The prime 3=(3^2-3)/2 is generated by p=3. The prime 11=(5^2-3)/2 is generated by p=5. The prime 23 by p=7.
%t Select[Table[(p^2 - 3)/2, {p, Prime[Range[300]]}], PrimeQ] (* _Vincenzo Librandi_, Oct 12 2012 *)
%o (Magma) [a: p in PrimesInInterval(1, 500) | IsPrime(a) where a is (p^2 - 3) div 2]; // _Vincenzo Librandi_, Oct 12 2012
%Y Cf. A110589, A153238.
%K nonn,easy
%O 1,1
%A _Vincenzo Librandi_, Sep 23 2009
%E More terms from _Max Alekseyev_, Sep 25 2009
%E Comment clarified by _R. J. Mathar_, Oct 07 2009
|
