A035613 7 in base n.

1111111, 111, 21, 13, 12, 11, 10, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7, 7

Offset: 1

Author

N. J. A. Sloane

Keywords

• nonn
• base
• easy

Links

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

Programs

Magma

I:=[1111111,111,21,13,12,11,10]; [n lt 8 select I[n] else 7: n in [1..93]]; // Bruno Berselli, Sep 12 2011

Mathematica

Prepend[Table[FromDigits[IntegerDigits[7, n]], {n, 2, 100}], (10^7 - 1)/9] (* Arkadiusz Wesolowski, Sep 12 2011 *)

PARI

a(n)=if(n>7,7,[1111111, 111, 21, 13, 12, 11, 10][n]) \\ Charles R Greathouse IV, Sep 02 2011

Formula

G.f.: x*(1111111-1111000*x-90*x^2-8*x^3-x^4-x^5-x^6-3*x^7)/(1-x). - Bruno Berselli, Sep 12 2011