login
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
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
Intersection of A007775 and A089229. - Felix Fröhlich, Jun 12 2016
Sequence in context: A294741 A052202 A089525 * A061671 A269809 A064902
KEYWORD
nonn
AUTHOR
Dimitris Valianatos, Jun 12 2016
STATUS
approved