|
Search: id:A069491
|
|
|
| A069491 |
|
a(n) = LCM ( 1 to n) / {(n+1)(n+2)...(n+k)} where k is the largest number which gives an integral value. |
|
+0
1
|
|
| 1, 2, 6, 12, 10, 60, 420, 840, 252, 2520, 2310, 27720, 1716, 24024, 360360, 720720, 680680, 12252240, 25194, 503880, 10581480, 232792560, 223092870, 5354228880, 1029659400, 26771144400, 2868336900, 80313433200, 77636318760
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
MATHEMATICA
|
Do[a = LCM @@ Table[i, {i, n}]; k = n + 1; If[ IntegerQ[a/k], While[ IntegerQ[a/k], a = a/k; k++ ]]; Print[a], {n, 1, 30}]
|
|
CROSSREFS
|
Sequence in context: A145102 A145103 A009230 this_sequence A127698 A130503 A074385
Adjacent sequences: A069488 A069489 A069490 this_sequence A069492 A069493 A069494
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Amarnath Murthy (amarnath_murthy(AT)yahoo.com), Mar 30 2002
|
|
EXTENSIONS
|
Edited and extended by Robert G. Wilson v (rgwv(AT)rgwv.com), Apr 01 2002
|
|
|
Search completed in 0.002 seconds
|
