%I #16 Jan 09 2023 01:23:42

%S 1,2,3,4,5,7,8,32

%N Numbers m such that both 3*2^m + 5 and 5*2^m + 3 are prime.

%C No more terms?

%t Select[Range[0,2200], PrimeQ[5*2^#+3] && PrimeQ[3*2^#+5]&]

%Y Intersection of A057913 and A058586.

%K nonn,more

%O 1,2

%A _Zak Seidov_, Oct 24 2013