A047421 Floor(8n/7).

0, 1, 2, 3, 4, 5, 6, 8, 9, 10, 11, 12, 13, 14, 16, 17, 18, 19, 20, 21, 22, 24, 25, 26, 27, 28, 29, 30, 32, 33, 34, 35, 36, 37, 38, 40, 41, 42, 43, 44, 45, 46, 48, 49, 50, 51, 52, 53, 54, 56, 57, 58, 59, 60, 61, 62, 64, 65, 66, 67, 68, 69, 70, 72, 73, 74, 75

Offset

0,3

Comments

Up to the offset identical to A004777, cf formula. - M. F. Hasler, Oct 06 2014

Links

Table of n, a(n) for n=0..66.

Index entries for linear recurrences with constant coefficients, signature (1,0,0,0,0,0,1,-1).

Formula

a(n) = A004777(n+1). - M. F. Hasler, Oct 06 2014

G.f.: x*(1 + x + x^2 + x^3 + x^4 + x^5 + 2*x^6) / (1 - x - x^7 + x^8). [Bruno Berselli, Oct 06 2014]

a(n) = n + floor(n/7) = a(n-1) + a(n-7) - a(n-8). [Bruno Berselli, Oct 06 2014]

Mathematica

Table[Floor[8 n/7], {n, 0, 80}] (* Bruno Berselli, Oct 06 2014 *)
LinearRecurrence[{1, 0, 0, 0, 0, 0, 1, -1}, {0, 1, 2, 3, 4, 5, 6, 8}, 70] (* Harvey P. Dale, Mar 06 2016 *)

Prog

(PARI) a(n)=n\7+n \\ M. F. Hasler, Oct 06 2014

Crossrefs

Cf. A032766, A004773, A001068, A047226, A047368, A004777.

Sequence in context: A052419 A257458 A179439 * A004777 A059561 A037474

Adjacent sequences: A047418 A047419 A047420 * A047422 A047423 A047424

Keyword

nonn,easy

Author

N. J. A. Sloane

Extensions

More terms from Ray Chandler, Sep 05 2004

Restored to version of early 2008 by M. F. Hasler, Oct 06 2014

Status

approved