%I #8 Jan 08 2024 10:58:10

%S 5,15,45,55,65,75,115,125,145,155,175,195,205,215,255,265,295,315,325,

%T 345,395,405,425,475,505,525,545,555,565,595,645,665,695,705,715,745,

%U 765,775,805,815,845,855,875,925,945,975,995,1025,1045,1055,1065,1095

%N Degrees Celsius for which Fahrenheit is a prime.

%H <a href="http://www.scorpiosite69.freeserve.co.uk/temperature.htm">Temperature Converter</a>.

%e f = 9 c / 5 + 32; a(1) = c = 5 because f = 41 is a prime.

%t f[c_]:=9 c /5 +32; A109952 = Select[Range[5, 2000, 5], PrimeQ[f[ # ]]&]

%Y Cf. A029925, A029926.

%K nonn

%O 1,1

%A _Zak Seidov_, Jul 06 2005