|
%I #24 Jul 25 2022 15:41:37
%S 46657,126217,748657,1569457,4909177,9613297,11972017,40160737,
%T 55462177,65037817,106041937,161035057,178451857,193910977,196358977,
%U 311388337,328573477,338740417,358940737,403043257,461502097,499310197,556450777,569332177,633639097,784966297,902645857,981789337,1125038377
%N Carmichael numbers ending in 7.
%H Amiram Eldar, <a href="/A355307/b355307.txt">Table of n, a(n) for n = 1..10000</a>
%H <a href="/index/Ca#Carmichael">Index entries for sequences related to Carmichael numbers</a>
%t Select[10*Range[0, 10^7] + 7, CompositeQ[#] && Divisible[# - 1, CarmichaelLambda[#]] &] (* _Amiram Eldar_, Jul 24 2022 *)
%o (Python)
%o from itertools import count, islice
%o from sympy import factorint
%o def A355307_gen(): # generator of terms
%o for n in count(7,10):
%o f = factorint(n)
%o if len(f) == sum(f.values()) > 1 and not any((n-1) % (p-1) for p in f):
%o yield n
%o A355307_list = list(islice(A355307_gen(),5)) # _Chai Wah Wu_, Jul 25 2022
%Y Intersection of A002997 and A017353.
%Y Cf. A352970, A354609, A355305, A355309.
%K nonn,base
%O 1,1
%A _Omar E. Pol_, Jul 24 2022
|
