%I #8 Mar 31 2012 13:22:06
%S 0,2,5,8,9,12,14,16,32,36,42,43,62,69,72,76,95,98,102,166,179,290,324,
%T 332,393,457,569,661,788,816,904,952,986,1004,1036,1064,1091,1279,
%U 1307,1491,1496,1521,1597,1740,1760,1856,2104,2196,2402,2699,2943,2999,3095,3509,3584,3890,3927,4074,4454,5162,5635,5860,6288,6478,6675,6911,7455,7806,10409,10735,11719,12312,14789,15171,18031,18764,23033,23461,26192,31490,32259,37641,41899,53582,57425,59724,63535,87393,95326
%N Numbers n such that 41#*2^n-1 is prime, where # denotes the primorial, A002110.
%C 41# = 304250263527210.
%t Select[Range[0, 100], PrimeQ[304250263527210*2^# - 1] &]
%K nonn
%O 1,2
%A _Pierre CAMI_, Dec 06 2010
|