The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A079530 a(n) = phi(n) - ceiling(sqrt(n)). 7
 0, -1, 0, 0, 1, -1, 3, 1, 3, 0, 6, 0, 8, 2, 4, 4, 11, 1, 13, 3, 7, 5, 17, 3, 15, 6, 12, 6, 22, 2, 24, 10, 14, 10, 18, 6, 29, 11, 17, 9, 33, 5, 35, 13, 17, 15, 39, 9, 35, 12, 24, 16, 44, 10, 32, 16, 28, 20, 50, 8, 52, 22, 28, 24, 39, 11, 57, 23, 35, 15, 61, 15, 63, 27, 31, 27, 51, 15, 69, 23, 45 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,7 COMMENTS a(n) >= 0 except for n = 2 and 6. REFERENCES D. S. Mitrinovic et al., Handbook of Number Theory, Kluwer, p. 9. LINKS G. C. Greubel, Table of n, a(n) for n = 1..10000 EXAMPLE a(6) = phi(6) - ceiling(sqrt(6)) = 2 - 3 = -1. MAPLE with(numtheory); A079530:=n->phi(n) - ceil(sqrt(n)); seq(A079530(k), k=1..100); # Wesley Ivan Hurt, Nov 01 2013 MATHEMATICA Table[EulerPhi[n] - Ceiling[Sqrt[n]], {n, 100}] (* Wesley Ivan Hurt, Nov 01 2013 *) PROG (PARI) a(n)=eulerphi(n)-sqrtint(n-1)-1 \\ Charles R Greathouse IV, Nov 01 2013 (MAGMA) [EulerPhi(n) - Ceiling(Sqrt(n)): n in [1..100]]; // G. C. Greubel, Jan 14 2019 (Sage) [euler_phi(n) - ceil(sqrt(n)) for n in (1..100)] # G. C. Greubel, Jan 14 2019 CROSSREFS Cf. A000010, A079531-A079534. Sequence in context: A191009 A082648 A174233 * A020815 A233931 A280725 Adjacent sequences:  A079527 A079528 A079529 * A079531 A079532 A079533 KEYWORD sign AUTHOR N. J. A. Sloane, Jan 23 2003 STATUS approved

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

Last modified June 23 02:02 EDT 2021. Contains 345395 sequences. (Running on oeis4.)