OFFSET
1,1
COMMENTS
First differs from A007304 at 2*3*5*7*11 = 2310, which is a(360) and thus beyond the tabulated range.
Subsequence of A030059. - Bill McEachen, Nov 06 2020
LINKS
Carl R. White, Table of n, a(n) for n = 1..10000
Eric Weisstein's World of Mathematics, Prime Sums
Wikipedia, Moebius function
MATHEMATICA
Select[Range[435], MoebiusMu[ # ] == -1 && Not[PrimeQ[ # ]] &] (* Alonso del Arte, Jan 24 2005 *)
PROG
(PARI) is(n)=my(f=factor(n)[, 2]); #f>2 && #f%2==1 && vecmax(f)==1 \\ Charles R Greathouse IV, Oct 19 2015
CROSSREFS
KEYWORD
nonn
AUTHOR
Eric W. Weisstein, Apr 03 2004
STATUS
approved