|
Search: id:A060735
|
|
|
| A060735 |
|
Where n / (phi(n) - 1) increases. |
|
+0
11
|
|
| 1, 2, 4, 6, 12, 18, 24, 30, 60, 90, 120, 150, 180, 210, 420, 630, 840, 1050, 1260, 1470, 1680, 1890, 2100, 2310, 4620, 6930, 9240, 11550, 13860, 16170, 18480, 20790, 23100, 25410, 27720, 30030, 60060, 90090, 120120, 150150, 180180, 210210
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
COMMENT
|
Except for the initial 1, this sequence is a primorial (A002110) followed by its multiples until the next primorial, then the multiples of that primorial, and so on. - Wilfredo Lopez (chakotay147138274(AT)yahoo.com), Dec 28 2006
|
|
FORMULA
|
a(1) = 1, a(n) = a(n-1) + sfk(a(n-1)) with sfk=A007947, square-free kernel. - Reinhard Zumkeller (reinhard.zumkeller(AT)gmail.com), Apr 10 2006
|
|
MAPLE
|
seq(seq(k*mul(ithprime(i), i=1..n-1), k=1..ithprime(n)-1), n=1..10); (from Vladeta Jovovic (vladeta(AT)Eunet.yu), Apr 08 2004)
|
|
MATHEMATICA
|
a = 0; Do[ b = n/(EulerPhi[ n ] + 1); If[ b > a, a = b; Print[ n ] ], {n, 1, 10^6} ]
|
|
CROSSREFS
|
Cf. A000010, A055719.
Sequence in context: A023995 A018189 A072121 this_sequence A051683 A007436 A052847
Adjacent sequences: A060732 A060733 A060734 this_sequence A060736 A060737 A060738
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Apr 23 2001
|
|
|
Search completed in 0.002 seconds
|
