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

Author

N. J. A. Sloane

Keywords

• nonn
• easy

Comments

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

Links

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

Crossrefs

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

Programs

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 *)

PARI

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

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]

Extensions

More terms from Ray Chandler, Sep 05 2004

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