login
A355309
Carmichael numbers ending in 3.
5
52633, 63973, 334153, 670033, 997633, 2508013, 2628073, 5968873, 6733693, 13696033, 15829633, 15888313, 18900973, 26280073, 27336673, 46483633, 53711113, 65241793, 67653433, 75765313, 124630273, 133344793, 158864833, 182356993, 227752993, 242641153, 292244833, 426821473, 577240273, 580565233, 600892993
OFFSET
1,1
MATHEMATICA
Select[10*Range[0, 10^7] + 3, CompositeQ[#] && Divisible[# - 1, CarmichaelLambda[#]] &] (* Amiram Eldar, Jul 25 2022 *)
PROG
(Python)
from itertools import count, islice
from sympy import factorint
def A355309_gen(): # generator of terms
for n in count(3, 10):
f = factorint(n)
if len(f) == sum(f.values()) > 1 and not any((n-1) % (p-1) for p in f):
yield n
A355309_list = list(islice(A355309_gen(), 5)) # Chai Wah Wu, Jul 26 2022
CROSSREFS
Intersection of A002997 and A017305.
Sequence in context: A201268 A200658 A303266 * A185530 A057851 A058326
KEYWORD
nonn,base
AUTHOR
Omar E. Pol, Jul 25 2022
STATUS
approved