A076052 - OEIS

%I #8 Nov 17 2013 04:07:40

%S 1,3,5,9,13,17,19,20,22,23,27,28,29,33,37,39,40,44,48,50,52,53,54,56,

%T 60,62,63,64,65,66,68,72,76,78,80,81,82,83,85,89,91,95,99,101,103,105,

%U 109,113,114,115,116,120,124,126,128,130,134,136,140,142,144,148,152

%N Sum(k=1, n, A006460(k)).

%H Reinhard Zumkeller, <a href="/A076052/b076052.txt">Table of n, a(n) for n = 1..10000</a>

%H <a href="/index/3#3x1"> Index entries for sequences related to 3x+1 (or Collatz) problem</a>

%F a(n) seems to be asymptotic to 7/3*n

%o (Haskell)

%o a076052 n = a076052_list !! (n-1)

%o a076052_list = scanl1 (+) $ map a006460 [1..]

%o -- _Reinhard Zumkeller_, Nov 16 2013

%K nonn

%O 1,2

%A _Benoit Cloitre_, Oct 30 2002