This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A178503 n minus totally additive with a(p)=PrimePi(p), where PrimePi(n)=A000720(n). 10
 1, 1, 1, 2, 2, 3, 3, 5, 5, 6, 6, 8, 7, 9, 10, 12, 10, 13, 11, 15, 15, 16, 14, 19, 19, 19, 21, 22, 19, 24, 20, 27, 26, 26, 28, 30, 25, 29, 31, 34, 28, 35, 29, 37, 38, 36, 32, 42, 41, 43, 42, 44, 37, 47, 47, 49, 47, 47, 42, 53, 43, 50, 55, 58, 56, 58, 48, 59, 58, 62, 51, 65, 52, 61 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,4 LINKS FORMULA a(n) = A000027(n) - A056239(n). MAPLE From R. J. Mathar, Apr 20 2010: (Start) A056239 := proc(n) add( numtheory[pi](op(1, p))*op(2, p), p = ifactors(n)[2]) ; end proc: A178503 := proc(n) n-A056239(n) ; end proc: seq(A178503(n), n=1..80) ; (End) CROSSREFS Sequence in context: A286107 A285735 A038810 * A211275 A240542 A325391 Adjacent sequences:  A178500 A178501 A178502 * A178504 A178505 A178506 KEYWORD nonn AUTHOR Juri-Stepan Gerasimov, Apr 19 2010 EXTENSIONS Corrected (a 27 replaced with 28) by R. J. Mathar, Apr 20 2010 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 May 23 11:20 EDT 2019. Contains 323514 sequences. (Running on oeis4.)