|
Search: id:A060735
|
|
|
| A060735 |
|
Where n / (phi(n) + 1) increases. |
|
+0
15
|
|
| 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.rs), 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: A018189 A167706 A072121 this_sequence A051683 A167777 A007436
Adjacent sequences: A060732 A060733 A060734 this_sequence A060736 A060737 A060738
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Apr 23 2001
|
|
EXTENSIONS
|
Definition corrected by Franklin T. Adams-Watters, Apr 16 2009
|
|
|
Search completed in 0.002 seconds
|
