A068485 One-sixtieth of the even leg of Pythagorean triangles whose other sides are both primes (other than 3, 5 or 13).
1, 3, 7, 29, 31, 42, 52, 85, 143, 161, 273, 330, 612, 1015, 1197, 1394, 1680, 1771, 2262, 2698, 2717, 3318, 3424, 3641, 4551, 4700, 5617, 6468, 7192, 8184, 8858, 8996, 9205, 9523, 9919, 10622, 11040, 11427, 11623, 15436, 17256, 17739, 18476, 18725, 19533
Offset: 1
Keywords
Programs
-
Mathematica
a068485[n_] := (Select[Map[Prime[#]^2&, Range[4, n]], PrimeQ[(#+1)/2]&]-1)/120 a068485[250] (* data - Hartmut F. W. Hoft, Aug 06 2020 *)
Formula
From Hartmut F. W. Hoft, Aug 06 2020: (Start)
a(n) = A067755(n+2)/60, n>=1.
a(n) = (A263951(n+2) - 1)/120, n>=1. (End)
Extensions
More terms from Sascha Kurz, Mar 26 2002
a(34)-a(45) from Ray Chandler, Apr 12 2010
Comments