A049831 a(n) = Max_{k=1..n} T(n,k), array T as in A049828.
0, 0, 1, 1, 3, 2, 4, 6, 5, 6, 8, 8, 11, 10, 9, 12, 12, 15, 15, 14, 19, 16, 19, 18, 19, 22, 21, 23, 26, 25, 27, 24, 27, 32, 27, 30, 33, 31, 33, 30, 35, 38, 35, 38, 40, 38, 44, 39, 44, 46, 43, 44, 47, 45, 53, 46, 49, 52, 50, 56, 54, 54, 57, 56
Offset: 1
Keywords
Links
- Tiberiu Szocs-Mihai, Euclidean summation functions, Math Ticks Blog, January 2011.
Crossrefs
Cf. A049828.
Programs
-
PARI
a(nn) = {for (n=1, nn, m = 0; for (k=1, n, a = n; b = k; r = 1; s = 0; while (r, q = a\b; r = a - b*q; s += r; a = b; b = r); m = max(m, s);); print1(m, ", "););} \\ Michel Marcus, Aug 18 2015
Comments