login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A354609
Carmichael numbers ending in 1.
5
561, 2821, 6601, 8911, 15841, 29341, 41041, 75361, 101101, 115921, 162401, 172081, 188461, 252601, 314821, 340561, 399001, 410041, 488881, 512461, 530881, 552721, 656601, 658801, 838201, 852841, 1024651, 1152271, 1193221, 1461241, 1615681, 1857241, 1909001, 2100901, 2113921, 2433601, 2455921, 2704801, 3057601
OFFSET
1,1
MATHEMATICA
Select[10*Range[0, 3*10^5] + 1, CompositeQ[#] && Divisible[# - 1, CarmichaelLambda[#]] &] (* Amiram Eldar, Jul 08 2022 *)
PROG
(Python)
from itertools import islice
from sympy import nextprime, factorint
def A354609_gen(): # generator of terms
p, q = 3, 5
while True:
for n in range(p+2+(-p-1)%10, q, 10):
f = factorint(n)
if max(f.values()) == 1 and not any((n-1) % (p-1) for p in f):
yield n
p, q = q, nextprime(q)
A354609_list = list(islice(A354609_gen(), 30)) # Chai Wah Wu, Jul 24 2022
CROSSREFS
Intersection of A002997 and A017281.
Sequence in context: A290692 A293622 A322130 * A207080 A339875 A290945
KEYWORD
nonn,base
AUTHOR
Omar E. Pol, Jul 08 2022
STATUS
approved