login
A141948
Primes congruent to 1 mod 27.
3
109, 163, 271, 379, 433, 487, 541, 757, 811, 919, 1297, 1459, 1567, 1621, 1783, 1999, 2053, 2161, 2269, 2377, 2539, 2593, 2647, 2917, 2971, 3079, 3187, 3457, 3511, 3673, 3727, 3889, 3943, 4051, 4159, 4483, 4591, 4861, 4969, 5023, 5077, 5347, 5563, 5779
OFFSET
1,1
LINKS
FORMULA
a(n) ~ 18n log n. - _Charles R Greathouse IV_, Jul 02 2016
MATHEMATICA
Select[Prime[Range[800]], MemberQ[{1}, Mod[#, 27]] &] (* _Vincenzo Librandi_, Aug 16 2012 *)
Select[Range[1, 6000, 27], PrimeQ] (* _Harvey P. Dale_, Jan 16 2023 *)
PROG
(Magma) [p: p in PrimesUpTo(7000) | p mod 27 eq 1 ]; // _Vincenzo Librandi_, Aug 16 2012
(PARI) is(n)=isprime(n) && n%27==1 \\ _Charles R Greathouse IV_, Jul 02 2016
CROSSREFS
Cf. A000040.
Sequence in context: A161483 A283792 A333743 * A102908 A141998 A061277
KEYWORD
nonn,easy
AUTHOR
_N. J. A. Sloane_, Jul 11 2008
STATUS
approved