A114105 - OEIS

A114105

The sum of the next n terms of A114103.

1, 8, 33, 92, 265, 384, 1057, 1384, 2475, 3160, 6721, 5556, 13273, 12656, 16545, 21904, 39457, 29664, 61921, 46220, 66381, 80608, 134113, 86712, 162825, 159224, 199395, 185444, 341881, 198480, 447361, 349728, 423093, 473416, 553105, 434844

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

LINKS

Table of n, a(n) for n=1..36.

MAPLE

A000217 := proc(n) n*(n+1)/2 ; end: A114103 := proc(n, k) lcm(n, A000217(n-1)+k) ; end: A114105 := proc(n) add( A114103(n, k), k=1..n) ; end: for n from 1 to 80 do printf("%d, ", A114105(n)) ; od ; # R. J. Mathar, May 10 2007

MATHEMATICA

rows = 8;

nmax = rows (rows + 1)/2;

a[n_] := Sum[LCM[n, n (n - 1)/2 + k], {k, 1, n}];

Table[a[n], {n, 1, nmax}] (* Jean-François Alcover, May 23 2024, after Ivan Neretin in A114103 *)

CROSSREFS

Cf. A114103, A114104.

Sequence in context: A212133 A212574 A210698 * A316148 A014820 A070736

Adjacent sequences: A114102 A114103 A114104 * A114106 A114107 A114108

KEYWORD

nonn

AUTHOR

Amarnath Murthy, Nov 21 2005

EXTENSIONS

Corrected and extended by Matthew Ohlsen (mjo178(AT)psu.edu), Feb 26 2006

More terms from R. J. Mathar, May 10 2007

STATUS

approved