This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A283844 a(n) = A063776(2*n) + 1. 1
 3, 5, 13, 33, 105, 345, 1173, 4097, 14573, 52433, 190653, 699073, 2581113, 9586985, 35791473, 134217729, 505290273, 1908874585, 7233629133, 27487790721, 104715393913, 399822410105, 1529755308213, 5864062017537, 22517998136937, 86607685141745 (list; graph; refs; listen; history; text; internal format)
 OFFSET 1,1 LINKS Vincenzo Librandi, Table of n, a(n) for n = 1..1000 Juhani KarhumÃ¤ki, S. Puzynina, M. Rao, M. A. Whiteland, On cardinalities of k-abelian equivalence classes, arXiv preprint arXiv:1605.03319 [math.CO], 2016. FORMULA See KarhumÃ¤ki et al. (2016), Proposition 7.4. MATHEMATICA Table[a=Select[Divisors[n], OddQ[#]&]; (1 + Apply[Plus, 2^(n/a)EulerPhi[a]]/n), {n, 2, 52, 2}] (* Vincenzo Librandi, Mar 29 2017 *) PROG (PARI) a(n) = my(m = 2*n); 1 + sumdiv(m, d, (d%2)* 2^(m/d)*eulerphi(d))/m; \\ Michel Marcus, Aug 18 2018 CROSSREFS Cf. A063776. A bisection of A283843. Sequence in context: A304357 A296023 A027039 * A032009 A032027 A005383 Adjacent sequences:  A283841 A283842 A283843 * A283845 A283846 A283847 KEYWORD nonn AUTHOR N. J. A. Sloane, Mar 28 2017 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 April 19 08:34 EDT 2019. Contains 322241 sequences. (Running on oeis4.)