1,4

The m in definition is given by A084558(n).

Sequence consists of numbers 0..A001563(n)-1 followed by numbers 0..A001563(n+1)-1, and so on. - Antti Karttunen, Dec 17 2012

A. Karttunen, Table of n, a(n) for n = 1..5040

a(n) = n-A000142(A084558(n)). - Antti Karttunen, Dec 17 2012

f:=proc(n) local i; for i from 0 to n do if i! > n then break; fi; od; n-(i-1)!; end;

[seq(f(n), n=1..70)];

(Scheme): (define (A212598 n) (- n (A000142 (A084558 n))))

(PARI) a(n)=my(m); while(m++!<=n, ); n-(m-1)! \\ Charles R Greathouse IV, Sep 02 2015

Cf. A136437, A212266, A220656.

Sequence in context: A278164 A279681 A053645 * A274650 A294648 A170899

Adjacent sequences: A212595 A212596 A212597 * A212599 A212600 A212601

nonn

N. J. A. Sloane, May 22 2012

approved