A266120 Local maxima of A265894 just before its descents: a(n) = A265894(A265899(n) - 1).

1, 2, 6, 4, 7, 10, 11, 10, 25, 19, 38, 23, 39, 20, 29, 40, 51, 62, 70, 77, 79, 78, 73, 66, 57, 47, 118, 91, 68, 49, 106, 71, 147, 93, 57, 108, 62, 112, 61, 105, 174, 89, 141, 68, 104, 154, 224, 100, 139, 191, 80, 105, 136, 172, 215, 263, 98, 116, 135, 154, 174, 192, 210, 225, 238, 248, 254, 257, 256, 251, 244, 233, 219, 204, 187, 169, 151, 133

Offset: 1

Author

Antti Karttunen, Dec 24 2015

Keywords

• nonn

Links

• Antti Karttunen, Table of n, a(n) for n = 1..2016

Crossrefs

Cf. A265894, A265899.

Programs

PARI

A099563(n) = { my(i=2,dig=0); until(0==n, dig = n % i; n = (n - dig)/i; i++); return(dig); };
A265894 = n -> A099563((2*n)! / n!);
i=0; p=1; n=0; while(i < 2016, n++; k = A265894(n); if(k <= p, i++; write("b266120.txt", i, " ", p)); p = k; );

Scheme

(define (A266120 n) (A265894 (- (A265899 n) 1)))

Formula

a(n) = A265894(A265899(n) - 1).