%I #8 Oct 09 2022 21:21:00
%S 1,11,20,71,85,102,106,207,209,214,232,256,284,305,330,361,447,522,
%T 615,792,902,932,935,1189,1345,1387,1457,1523,1686,1796,1824,2108,
%U 2141,2164,2185,2260,2449,2519,2526,2958,3191,3329,3366,3681,3956,3970,4253,4304,4421
%N a(n) = (A283869(n)-1)/60.
%t Select[Range[5000], AllTrue[(60*# + {1, 13, 2, 14})/{1, 1, 2, 2}, PrimeQ] &] (* _Amiram Eldar_, Sep 08 2022 *)
%Y Cf. A005383, A283869.
%K nonn
%O 1,2
%A _Zak Seidov_, Sep 08 2022
|