OFFSET
1,2
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..5000
FORMULA
a(n) = floor((1/2)*(n+1)^(3/2)).
MATHEMATICA
f[n_] = Floor[(1/2)*(n+1)^(3/2)];
t1=Table[f[n], {n, 1, 90}]; t1 (* A185546 *)
t2=Complement[Range[200], Table[f[n], {n, 1, 80}]]; t2 (* 185547 *)
PROG
(PARI) for(n=1, 50, print1(floor((1/2)*(n+1)^(3/2)), ", ")) \\ G. C. Greubel, Jul 07 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Clark Kimberling, Jan 30 2011
STATUS
approved