|
|
A274172
|
|
Nonsquare composites with all prime factors larger than 5.
|
|
1
|
|
|
77, 91, 119, 133, 143, 161, 187, 203, 209, 217, 221, 247, 253, 259, 287, 299, 301, 319, 323, 329, 341, 343, 371, 377, 391, 403, 407, 413, 427, 437, 451, 469, 473, 481, 493, 497, 511, 517, 527, 533, 539, 551, 553, 559, 581, 583, 589
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
Nonsquare composites not divisible by 2,3,5.
|
|
LINKS
|
|
|
EXAMPLE
|
377 = 13*29 is a term.
|
|
MAPLE
|
filter:= n -> igcd(n, 30)=1 and not issqr(n) and not isprime(n):
select(filter, [seq(i, i=3..1000, 2)]); # Robert Israel, May 30 2021
|
|
PROG
|
(PARI) { for(n=1, 600, if(!(isprime(n) || n%2==0 || n%3==0 || n%5==0 || issquare(n)), print1(n", ")))}
(PARI) is(n) = my(f=factor(n)); if(!issquare(n), f[1, 1]>5 && matsize(f)[1]>1, 0) \\ David A. Corneth, Jun 12 2016
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|