1,6

Table of n, a(n) for n=1..88.

a(n) = A073482(n) - A073481(n).

a(7)=3 because the 7th squarefree number is 10 = 2*5 and 5 - 2 = 3.

with(numtheory): a:=proc(n) local FS: FS:=factorset(n): if abs(mobius(n))>0 then FS[nops(FS)]-FS[1] else fi end: seq(a(n), n=2..180); # Emeric Deutsch, Mar 07 2006

Sequence in context: A092669 A255986 A011400 * A072736 A135090 A303690

Adjacent sequences: A115010 A115011 A115012 * A115014 A115015 A115016

nonn

Leroy Quet, Feb 28 2006

More terms from Emeric Deutsch, Mar 07 2006

approved