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

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A347286 a(n) is n minus the number of odd divisors of n. 0
 0, 1, 1, 3, 3, 4, 5, 7, 6, 8, 9, 10, 11, 12, 11, 15, 15, 15, 17, 18, 17, 20, 21, 22, 22, 24, 23, 26, 27, 26, 29, 31, 29, 32, 31, 33, 35, 36, 35, 38, 39, 38, 41, 42, 39, 44, 45, 46, 46, 47, 47, 50, 51, 50, 51, 54, 53, 56, 57, 56, 59, 60, 57, 63, 61, 62, 65, 66, 65, 66 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,4 COMMENTS a(n) is n minus the number of partitions of n into consecutive parts. This definition is in accordance with the diagram as shown below in the Example section which also appears in many sequences related to A237048, A237591, A237593 and possible others. a(n) is also the number of zeros in the n-th row of A285898. LINKS Table of n, a(n) for n=1..70. FORMULA a(n) = n - A001227(n). EXAMPLE For n = 18 the divisors of 18 are 1, 2, 3, 6, 9, 18. There are three odd divisors: 1, 3, 9, so a(18) = 18 - 3 = 15. On the other hand the partitions of 18 into consecutive parts are [18], [7, 6, 5], [6, 5, 4, 3]. There are three of such partitions, so a(18) = 18 - 3 = 15. Illustration of initial terms: . n a(n) Diagram _ 1 0 _|x| 2 1 _|x _| 3 1 _|x |x| 4 3 _|x _| | 5 3 _|x |x _| 6 4 _|x _| |x| 7 5 _|x |x | | 8 7 _|x _| _| | 9 6 _|x |x |x _| 10 8 _|x _| | |x| 11 9 _|x |x _| | | 12 10 _|x _| |x | | 13 11 _|x |x | _| | 14 12 _|x _| _| |x _| 15 11 _|x |x |x | |x| 16 15 _|x _| | | | | 17 15 _|x |x _| _| | | 18 15 _|x _| |x |x | | 19 17 _|x |x | | _| | 20 18 _|x _| _| | |x _| 21 17 |x |x |x | | |x| ... In the above diagram the number of x's in row n equals A001227(n), the number of partitions n into consecutive parts. a(n) is the number of square cells in row n that do not contain a "x". In other words: a(n) is the number of square cells in row n that do not have a horizontal line segment above. MATHEMATICA a[n_] := n - DivisorSigma[0, n/2^IntegerExponent[n, 2]]; Array[a, 70] (* Amiram Eldar, Sep 12 2021 *) PROG (PARI) a(n) = n - sumdiv(n, d, d%2); \\ Michel Marcus, Sep 12 2021 CROSSREFS Cf. A001227, A196020, A204217, A235791, A237048, A237591, A237593, A238005, A245092, A285898, A286000, A286001. Sequence in context: A104803 A104804 A240207 * A144489 A239640 A100091 Adjacent sequences: A347283 A347284 A347285 * A347287 A347288 A347289 KEYWORD nonn,easy AUTHOR Omar E. Pol, Sep 12 2021 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.

Last modified April 16 02:41 EDT 2024. Contains 371696 sequences. (Running on oeis4.)