|
| |
|
|
A056839
|
|
Squarefree part of LCM[1,...,n].
|
|
2
|
|
|
|
1, 2, 6, 3, 15, 15, 105, 210, 70, 70, 770, 770, 10010, 10010, 10010, 5005, 85085, 85085, 1616615, 1616615, 1616615, 1616615, 37182145, 37182145, 7436429, 7436429, 22309287, 22309287, 646969323, 646969323, 20056049013, 40112098026
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,2
|
|
|
LINKS
|
Table of n, a(n) for n=0..31.
|
|
|
FORMULA
|
a(n)=A007913(A003418(n))=LCM[n]/LCM[q]^2, where LCM[n]=LCM[1, ..., n]=A003418(n), q=Floor[Sqrt[n]]=A000196(n)
|
|
|
EXAMPLE
|
n=65, LCM[1,..,65]=1182266884102822267511361600, Floor(Sqrt(65))=8, LCM[8]=8.3.5.7]=840, a(65)=LCM(65)/LCM(8)^2=1675548305134385299761 is squarefree.
|
|
|
CROSSREFS
|
A007913, A003418, A000196.
Sequence in context: A072155 A094299 A121566 * A071301 A145642 A056195
Adjacent sequences: A056836 A056837 A056838 * A056840 A056841 A056842
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
Labos E. (labos(AT)ana.sote.hu), Aug 29 2000
|
|
|
STATUS
|
approved
|
| |
|
|
