login
Primes congruent to {1, 7, 8, 25, 26, 32} mod 33.
1

%I #10 Jul 26 2020 13:38:44

%S 7,41,59,67,73,107,131,139,157,173,191,197,199,223,239,257,263,271,

%T 331,337,389,397,421,461,463,487,503,521,569,587,593,601,619,653,659,

%U 661,701,719,727,733,751,857,859,883,983,991,997,1031,1049,1063,1097,1123

%N Primes congruent to {1, 7, 8, 25, 26, 32} mod 33.

%C The cyclotomic polynomial Phi(33p,x) is flat only for p in this sequence.

%H Georg Fischer, <a href="/A161505/b161505.txt">Table of n, a(n) for n = 1..1000</a>

%F Union of A142049, A142053, A142054, A142063, A142064, A142068.

%t Flatten[Table[Select[33*n+{-8,-7,-1,1,7,8}, PrimeQ], {n,50}]]

%Y Cf. A117223, A142049, A142053, A142054, A142063, A142064, A142068, A160495.

%K nonn

%O 1,1

%A _T. D. Noe_, Jun 17 2009

%E a(1)=7 inserted by _Georg Fischer_, Jul 26 2020