login
This site is supported by donations to The OEIS Foundation.

 

Logo


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.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 19 08:34 EDT 2019. Contains 322241 sequences. (Running on oeis4.)