OFFSET
1,1
REFERENCES
M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau of Standards Applied Math. Series 55, Tenth Printing, 1972, p. 826.
G. H. Hardy and E. M. Wright, An Introduction to the Theory of Numbers, 5th ed., Oxford Univ. Press, 1979, th. 262 and 287.
LINKS
Charles R Greathouse IV, Table of n, a(n) for n = 1..10000
Marc Deléglise and Joël Rivat, Computing the summation of the Mobius function, Experiment. Math. 5:4 (1996), pp. 291-295.
Ed Pegg Jr., The Mobius function (and squarefree numbers)
G. Villemin's Almanac of Numbers, Nombres de Moebius et de Mertens
MAPLE
with(numtheory): for n from 1 to 15000 do; if mobius(n)= -1 and mobius(n+1) = 0 and mobius(n+2)= -1 and mobius(n+3)= 0 and mobius(n+4)= -1 and mobius(n+5) = 0 then print(n); else fi ; od;
MATHEMATICA
SequencePosition[MoebiusMu[Range[11000]], {-1, 0, -1, 0, -1, 0}][[All, 1]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Sep 17 2016 *)
PROG
(PARI) is(n)=moebius(n)<0 && !moebius(n+1) && moebius(n+2)<0 && !moebius(n+3) && moebius(n+4)<0 && !moebius(n+5) \\ Charles R Greathouse IV, Sep 26 2013
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Lagneau, Feb 01 2010
EXTENSIONS
a(4) inserted by Charles R Greathouse IV, Sep 26 2013
STATUS
approved