OFFSET
1,1
COMMENTS
Subsequence of A193166. - Reinhard Zumkeller, Aug 26 2011
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
FORMULA
A192280(a(n)) = 0. - Reinhard Zumkeller, Aug 26 2011
MATHEMATICA
q[n_] := SequenceCount[FactorInteger[n][[;; , 1]], {p1_, p2_} /; p2 != NextPrime[p1]] > 0; Select[Range[177], SquareFreeQ[#] && q[#] &] (* Amiram Eldar, Apr 10 2021 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Reinhard Zumkeller, Aug 03 2002
STATUS
approved