login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A097850 a(n) = floor(2*sqrt(n)*phi(n)) - n. 2
1, 0, 3, 4, 12, 3, 24, 14, 27, 15, 55, 15, 73, 30, 46, 48, 114, 32, 137, 51, 88, 71, 188, 54, 175, 96, 160, 98, 272, 57, 303, 149, 196, 152, 248, 108, 400, 183, 260, 162, 471, 113, 507, 221, 276, 252, 583, 173, 539, 232, 406, 294, 704, 210, 538, 303, 486, 368, 832, 187, 876 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,3
COMMENTS
Always >= 0. But see A079530 and A097604 for stronger upper bounds on n/phi(n).
REFERENCES
David Burton, Elementary Number Theory" 4th edition, problem 7a in section 7.2 has the equivalent of n/phi(n) <= 2*sqrt(n). - Jud McCranie, Aug 30 2004
LINKS
MATHEMATICA
Table[Floor[2*Sqrt[n]*EulerPhi[n]]-n, {n, 1, 100}] (* G. C. Greubel, Jan 14 2019 *)
PROG
(PARI) vector(100, n, (2*sqrt(n)*eulerphi(n))\1 -n) \\ G. C. Greubel, Jan 14 2019
(Magma) [Floor(2*Sqrt(n)*EulerPhi(n)) - n: n in [1..100]]; // G. C. Greubel, Jan 14 2019
(Sage) [floor(2*sqrt(n)*euler_phi(n)) - n for n in (1..100)] # G. C. Greubel, Jan 14 2019
CROSSREFS
Sequence in context: A084200 A348997 A354781 * A238855 A034854 A164982
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Aug 30 2004
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified March 29 09:14 EDT 2024. Contains 371268 sequences. (Running on oeis4.)