A185549 a(n) = ceiling(n^(3/2)); complement of A185550.

0, 1, 3, 6, 8, 12, 15, 19, 23, 27, 32, 37, 42, 47, 53, 59, 64, 71, 77, 83, 90, 97, 104, 111, 118, 125, 133, 141, 149, 157, 165, 173, 182, 190, 199, 208, 216, 226, 235, 244, 253, 263, 273, 282, 292, 302, 312, 323, 333, 343, 354, 365, 375, 386, 397, 408, 420, 431, 442, 454, 465, 477, 489

Offset: 0

Author

Clark Kimberling, Jan 30 2011

Keywords

• nonn
• easy

Links

• Reinhard Zumkeller, Table of n, a(n) for n = 0..10000

Crossrefs

Cf. A000093, A077107, A185550.

Cf. A144968 (first differences).

Programs

Haskell

a185549 = ceiling . (** (3 / 2)) . fromIntegral
-- Reinhard Zumkeller, Jul 24 2015

Mathematica

f[n_]=Ceiling[n^(3/2)];
t1=Table[f[n],{n,1,90}];t1  (* A185549 *)
t2=Complement[Range[150], Table[f[n],{n,1,80}]];t2  (* A185550 *)
Ceiling[Sqrt[Range[0,70]^3]] (* Harvey P. Dale, Jul 04 2023 *)

PARI

for(n=0,50, print1(ceil(n^(3/2)), ", ")) \\ G. C. Greubel, Jul 08 2017

Formula

a(n) = ceiling(n^(3/2)).

a(n) = sqrt(A077107(n)). - Amiram Eldar, May 17 2025

Extensions

Initial a(0)=0 prepended and offset adjusted by Reinhard Zumkeller, Jul 24 2015