OFFSET
1,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000
EXAMPLE
12, the 4th nonsquarefree positive integer, is 2^2 * 3. 3 is the largest prime dividing 12. So a(4) = 3.
MAPLE
with(numtheory): a:=proc(n) if mobius(n)=0 then op(nops(factorset(n)), factorset(n)) fi end: seq(a(n), n=1..270); # Emeric Deutsch, Mar 06 2006
MATHEMATICA
FactorInteger[ # ][[ -1, 1]] & /@ Select[ Range@235, !SquareFreeQ@# &] (* Robert G. Wilson v, Mar 09 2006 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Leroy Quet, Mar 01 2006
EXTENSIONS
More terms from Emeric Deutsch and Robert G. Wilson v, Mar 06 2006
STATUS
approved