# Greetings from The On-Line Encyclopedia of Integer Sequences! http://oeis.org/

Search: id:a114718
Showing 1-1 of 1

%I A114718 #9 Apr 09 2014 10:16:58
%S A114718 1,2,6,6,10,13,17,43,59,69,85,85,103,123,147,128,185,171,246,192,259,
%T A114718 224,356,328,400,358,373,498,497,496,787,443,886,664,560,795,770,839,
%U A114718 945,993,981,866,1083,1010,1449,1173,1439,1400,1656,1389,1380,1526,1445
%N A114718 a(n) = sum of terms in n-th row of triangle A112599.
%e A114718 The 7th row of triangle A112599 is [6,1,3,1,2,1,3]. So a(7) = 6+1+3+1+2+1+3 = 17.
%t A114718 f[l_] := Block[{p, t}, p = l[[ -1]]; k = Length@p; t = Table[ Count[ GCD[p, n], 1], {n, k + 1}]; Return@Append[l, t];]; Plus @@@ Nest[f, {{1}}, 52] (* _Robert G. Wilson v_ *)
%Y A114718 Cf. A112599, A114719.
%K A114718 nonn
%O A114718 1,2
%A A114718 _Leroy Quet_, Dec 27 2005
%E A114718 More terms from _Robert G. Wilson v_, Dec 28 2005

# Content is available under The OEIS End-User License Agreement: http://oeis.org/LICENSE