%I #4 Jul 07 2021 18:35:19
%S 13,43,337,349,117643,40353601,33232930569607,558545864083284001,
%T 1341068619663964900801,7730993719707444524137094401,
%U 2651730845859653471779023381607
%N Prime numbers of the form 7^k +- 6.
%t Select[Flatten[Table[7^k+{6,-6},{k,40}]],PrimeQ]//Sort (* _Harvey P. Dale_, Jul 07 2021 *)
%Y Cf. A000040, A000668, A144231, A144232, A144233, A144234
%K nonn
%O 1,1
%A _Reikku Kulon_, Sep 15 2008