

A038512


Nonprime numbers with smallest prime factor >= 13.


3



169, 221, 247, 289, 299, 323, 361, 377, 391, 403, 437, 481, 493, 527, 529, 533, 551, 559, 589, 611, 629, 667, 689, 697, 703, 713, 731, 767, 779, 793, 799, 817, 841, 851, 871, 893, 899, 901, 923, 943, 949, 961, 989, 1003, 1007, 1027, 1037, 1073, 1079
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

Composite numbers k such that k^120 mod 2310 = 1.  Gary Detlefs, May 02 2012
The asymptotic density of this sequence is 16/77.  Amiram Eldar, Mar 22 2021


LINKS

T. D. Noe, Table of n, a(n) for n = 1..10000


MAPLE

for n from 1 to 1079 do if n^120 mod 2310=1 then print(n) fi od; # Gary Detlefs, May 02 2012


MATHEMATICA

Select[Range[1000], ! PrimeQ[#] && FactorInteger[#][[1, 1]] >= 13 &] (* T. D. Noe, Mar 16 2013 *)


CROSSREFS

Intersection of A002808 and A008365.
Sequence in context: A260055 A235718 A239724 * A141075 A124979 A292559
Adjacent sequences: A038509 A038510 A038511 * A038513 A038514 A038515


KEYWORD

nonn


AUTHOR

Jeff Burch


EXTENSIONS

913=11*83 deleted by JeanMarc Rebert, Jul 08 2009
923=13*71 added by Howard Berman (howard_berman(AT)hotmail.com), Jan 22 2010
1 removed by T. D. Noe, Mar 16 2013


STATUS

approved



