A284567 - OEIS

A284567

a(0) = 1; for n >= 1, a(n) = A059897(n, a(n-1)).

1, 1, 2, 6, 24, 120, 20, 140, 70, 630, 63, 693, 8316, 108108, 30888, 51480, 823680, 14002560, 777920, 14780480, 739024, 15519504, 2821728, 64899744, 43266496, 1081662400, 166409600, 4493059200, 160466400, 4653525600, 3877938000, 120216078000, 15027009750, 495891321750, 14585038875, 20419054425, 9075135300, 335780006100

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

OFFSET

0,3

LINKS

Antti Karttunen, Table of n, a(n) for n = 0..256

FORMULA

a(0) = 1; for n >= 1, a(n) = A059897(n, a(n-1)).

n!/a(n) = A284568(n).

A001222(a(n)) = A284561(n).

PROG

(Scheme)

(define (A284567 n) (let loop ((n n) (acc 1)) (if (zero? n) acc (loop (- n 1) (A059897bi acc n))))) ;; For A059897bi see under A059897.