cp's OEIS Frontend

A062249 a(n) = n + d(n), where d(n) = number of divisors of n, cf. A000005.

%I A062249 #44 Jul 08 2023 15:47:22
%S A062249 2,4,5,7,7,10,9,12,12,14,13,18,15,18,19,21,19,24,21,26,25,26,25,32,28,
%T A062249 30,31,34,31,38,33,38,37,38,39,45,39,42,43,48,43,50,45,50,51,50,49,58,
%U A062249 52,56,55,58,55,62,59,64,61,62,61,72,63,66,69,71,69,74,69,74,73,78,73
%N A062249 a(n) = n + d(n), where d(n) = number of divisors of n, cf. A000005.
%C A062249 Number of cyclic subgroups of dihedral group with 2n elements.
%C A062249 a(n) is the n-th smallest number not a divisor of n. - _J. Lowell_, Apr 06 2008
%H A062249 Harry J. Smith, <a href="/A062249/b062249.txt">Table of n, a(n) for n=1..1000</a>
%F A062249 a(n) = n + A000005(n). - _Omar E. Pol_, Dec 12 2008
%F A062249 From _Ilya Gutkovskiy_, Apr 12 2017: (Start)
%F A062249 G.f.: x/(1 - x)^2 + Sum_{k>=1} x^k/(1 - x^k).
%F A062249 Dirichlet g.f.: zeta(s)^2 + zeta(s-1). (End)
%p A062249 with(numtheory):seq(n+tau(n), n=1..71) ; # _Zerinvary Lajos_, Jun 04 2008
%t A062249 Table[n + DivisorSigma[0, n], {n, 100}] (* _Indranil Ghosh_, Apr 12 2017 *)
%o A062249 (PARI) a(n) = n + numdiv(n) \\ _Harry J. Smith_, Aug 03 2009
%o A062249 (Haskell)
%o A062249 a062249 n = a000005 n + n  -- _Reinhard Zumkeller_, Mar 29 2014
%o A062249 (Python)
%o A062249 from sympy.ntheory import divisor_count
%o A062249 [n + divisor_count(n) for n in range(101)] # _Indranil Ghosh_, Apr 12 2017
%Y A062249 Cf. A007503, A060710, A000005, A049820.
%Y A062249 Cf. A064491 (iteration, start=1).
%K A062249 nonn
%O A062249 1,1
%A A062249 Ahmed Fares (ahmedfares(AT)my-deja.com), Jul 01 2001
%E A062249 Formula and more terms from _Vladeta Jovovic_, Jul 03 2001