cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A333823 a(n) = Sum_{d|n, d odd} (n/d)^d.

This page as a plain text file.
%I A333823 #15 Jul 09 2023 12:13:42
%S A333823 1,2,4,4,6,14,8,8,37,42,12,76,14,142,384,16,18,746,20,1044,2552,2070,
%T A333823 24,536,3151,8218,20440,16412,30,41574,32,32,178512,131106,94968,
%U A333823 263908,38,524326,1596560,32808,42,2379874,44,4194348,16364502,8388654,48,4144,823593,33654482
%N A333823 a(n) = Sum_{d|n, d odd} (n/d)^d.
%H A333823 Seiichi Manyama, <a href="/A333823/b333823.txt">Table of n, a(n) for n = 1..5000</a>
%F A333823 G.f.: Sum_{k>=1} k * x^k / (1 - k^2*x^(2*k)).
%F A333823 a(2^n) = 2^n. - _Seiichi Manyama_, Apr 07 2020
%t A333823 Table[DivisorSum[n, (n/#)^# &, OddQ[#] &], {n, 50}]
%t A333823 nmax = 50; CoefficientList[Series[Sum[k x^k/(1 - k^2 x^(2 k)), {k, 1, nmax}], {x, 0, nmax}], x] // Rest
%o A333823 (PARI) a(n) = sumdiv(n, d, if ((d)%2, (n/d)^d)); \\ _Michel Marcus_, Apr 07 2020
%o A333823 (Python)
%o A333823 from sympy import divisors
%o A333823 def A333823(n): return sum((n//d)**d for d in divisors(n>>(~n & n-1).bit_length(),generator=True)) # _Chai Wah Wu_, Jul 09 2023
%Y A333823 Cf. A055225, A333824.
%K A333823 nonn
%O A333823 1,2
%A A333823 _Ilya Gutkovskiy_, Apr 06 2020