%I #14 Apr 10 2021 05:52:01
%S 10,14,21,22,26,33,34,38,39,42,46,51,55,57,58,62,65,66,69,70,74,78,82,
%T 85,86,87,91,93,94,95,102,106,110,111,114,115,118,119,122,123,129,130,
%U 133,134,138,141,142,145,146,154,155,158,159,161,165,166,170,174,177
%N Squarefree numbers having at least one prime gap.
%C Subsequence of A193166. - _Reinhard Zumkeller_, Aug 26 2011
%H Amiram Eldar, <a href="/A073486/b073486.txt">Table of n, a(n) for n = 1..10000</a>
%F A073484(a(n)) > 0 and A073483(a(n)) > 1.
%F A192280(a(n)) = 0. - _Reinhard Zumkeller_, Aug 26 2011
%t q[n_] := SequenceCount[FactorInteger[n][[;; , 1]], {p1_, p2_} /; p2 != NextPrime[p1]] > 0; Select[Range[177], SquareFreeQ[#] && q[#] &] (* _Amiram Eldar_, Apr 10 2021 *)
%Y Cf. A005117, A073487, A073488, A073489, A073485, A073492, A193166.
%K nonn
%O 1,1
%A _Reinhard Zumkeller_, Aug 03 2002