A059620 Colors of the 88 keys of the standard piano: white keys = 0, black keys = 1, start with A0 = the 0th key.

0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 0

Offset: 0

Author

Naohiro Nomoto, Feb 19 2001

Keywords

• easy
• fini
• full
• nonn
• nice

Examples

			.1..1.1..1.1.1..1.1..1.1.1..1.1..1.1.1..1.1..1.1.1..1.1..1.1.1..1.1..1.1.1..1.1..1.1.1
0.00.0.00.0.0.00.0.00.0.0.00.0.00.0.0.00.0.00.0.0.00.0.00.0.0.00.0.00.0.0.00.0.00.0.0.00
		

Links

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

Crossrefs

Cf. A060106, A060107, A081031, A081032.

Programs

Mathematica

Flatten[Table[{0, 1, 0, 0, 1, 0, 1, 0, 0, 1, 0, 1}, {8}]][[1 ;; 88]] (* Jean-François Alcover, Apr 24 2017 *)
PadRight[{},88,{0,1,0,0,1,0,1,0,0,1,0,1}] (* Harvey P. Dale, Sep 14 2020 *)

Formula

a(n) = floor((5n+7)/12) - floor((5n+2)/12). - David W. Wilson, Mar 02 2003

G.f.: -x*(1+x^3+x^5+x^8+x^10) / ( (x-1) *(1+x+x^2) *(1+x) *(1-x+x^2) *(1+x^2) *(x^4-x^2+1) ). - R. J. Mathar, Dec 16 2016

a(n) = 0 if n is in A060107, a(n) = 1 if n is in A060106. - Jianing Song, Oct 14 2019