%I
%S 17,27,28,29,33,41,42,54,55,70,84,85,93,107,132,133,140,141,142,143,
%T 158,162,170,171,172,173,179,190,201,202,203,213,214,215,216,217,218,
%U 241,242,243,247,268,269,270,279,280,281,282,283,294,295,296,310,326,327,339,366
%N Numbers n such that lambda(n) = lambda(n+1) = lambda(n+2) = lambda(n+3), where lambda(n) = A008836(n) is the Liouville function.
%C Hildebrand proved that each of the 8 possible 3tuples of values +1 and 1 occur infinitely often as values of the Liouville function at consecutive arguments. It seems difficult to extend Hildebrand's result to patterns of length larger than 3. However, for results in this direction see Buttkewitz & Elsholtz.
%D Adolf J. Hildebrand, Multiplicative properties of consecutive integers; pp. 103118 in Analytic number theory, ed. by Y. Motohashi.
%H Charles R Greathouse IV, <a href="/A221282/b221282.txt">Table of n, a(n) for n = 1..10000</a>
%H Y. Buttkewitz and C. Elsholtz, <a href="http://jlms.oxfordjournals.org/content/84/3/578">Patterns and complexity of multiplicative functions</a>, Journal of the London Mathematical Society 84:3 (2011), pp. 578594.
%e a(1) = 17 because 17, 18, 19, 20 each have an odd number of prime factors (counted with repetition, 1, 3, 1, 3, respectively) and this is the first integer for which this is true.
%t Select[Range[400], Length[Union[LiouvilleLambda[Range[#, # + 3]]]] == 1 &] (* _Alonso del Arte_, Jan 09 2013 *)
%o (PARI) is(n)=my(k=(1)^bigomega(n)); k==(1)^bigomega(n+1) && k==(1)^bigomega(n+2) && k==(1)^bigomega(n+3)
%Y Subsequence of A221281. Cf. A008836, A221280.
%K nonn
%O 1,1
%A _Charles R Greathouse IV_, Jan 09 2013
