OFFSET
1,1
LINKS
Andrew Howroyd, Table of n, a(n) for n = 1..11
N. J. A. Sloane, A Nasty Surprise in a Sequence and Other OEIS Stories, Experimental Mathematics Seminar, Rutgers University, Oct 10 2024, Youtube video; Slides [Mentions this sequence]
FORMULA
a(n) = n!*A375532(n-1) + 1.
MAPLE
s:= proc(n) s(n):= `if`(n=0, 0, s(n-1)+n!/a(n)) end:
a:= proc(n) a(n):= 1+floor(n!/(1-s(n-1))) end:
seq(a(n), n=1..8); # Alois P. Heinz, Oct 18 2024
PROG
(PARI) B(u)={my(v=vector(#u)); my(r=1); for(i=1, #u, my(t=floor(u[i]/r)+1); v[i]=t; r-=u[i]/t); v}
a(n)={B(vector(n, k, k!))[n]} \\ Andrew Howroyd, Sep 04 2024
CROSSREFS
KEYWORD
nonn
AUTHOR
N. J. A. Sloane, Sep 04 2024
STATUS
approved