Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A014250
a(n) = b(n) - c(n) where b(n) = [ (3/2)^n ] and c(n) is the n-th number not in sequence b.
1
-3, -4, -5, -4, -3, -1, 4, 11, 23, 41, 68, 110, 174, 270, 415, 633, 961, 1451, 2189, 3297, 4958, 7451, 11191, 16802, 25218, 37842, 56780, 85186, 127797, 191712, 287586, 431398, 647117, 970696, 1456065, 2184119, 3276200, 4914322
OFFSET
1,1
LINKS
MATHEMATICA
m:=40; c:= Complement[Range[2*m], Floor[(3/2)^Range[2*m]]]; Table[Floor[(3/2)^n] - c[[n]], {n, m}] (* G. C. Greubel, Jun 19 2019 *)
CROSSREFS
Cf. A002379.
Sequence in context: A072006 A014238 A275719 * A155078 A332420 A115051
KEYWORD
sign
EXTENSIONS
a(38) corrected by Sean A. Irvine, Oct 17 2018
STATUS
approved