|
| |
|
|
A070935
|
|
Largest proper divisor of n^2.
|
|
1
| |
|
|
2, 3, 8, 5, 18, 7, 32, 27, 50, 11, 72, 13, 98, 75, 128, 17, 162, 19, 200, 147, 242, 23, 288, 125, 338, 243, 392, 29, 450, 31, 512, 363, 578, 245, 648, 37, 722, 507, 800, 41, 882, 43, 968, 675, 1058, 47, 1152, 343, 1250, 867, 1352, 53, 1458, 605, 1568, 1083, 1682
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 2,1
|
|
|
COMMENTS
| Computable as largest value of GCD[n^2,j] for j=1+n^2,...,-1+2*n^2.
|
|
|
FORMULA
| a(n)=A032742[n^2]=n*A032742[n]
|
|
|
MATHEMATICA
| Table[Max[Table[GCD[n^2, w], {w, n^2+1, 2*n^2-1}]], {n, 2, 128}]
|
|
|
CROSSREFS
| Cf. A032742.
Sequence in context: A004730 A168014 A050369 * A095164 A075384 A072500
Adjacent sequences: A070932 A070933 A070934 * A070936 A070937 A070938
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), May 22 2002
|
| |
|
|
