Search: id:A039982 Results 1-1 of 1 results found. %I A039982 %S A039982 1,1,0,1,0,1,1,1,0,1,1,1,0,1,0,1,0,1,1,1,0,1,0,1,0,1,1,1,0,1,1,1,0,1,1, %T A039982 1,0,1,0,1,0,1,1,1,0,1,1,1,0,1,1,1,0,1,0,1,0,1,1,1,0,1,0,1,0,1,1,1,0,1, %U A039982 0,1,0,1,1,1,0,1,1,1,0,1,1,1,0,1,0,1,0,1,1,1,0,1,0,1,0,1,1,1,0,1,0,1,0 %N A039982 An example of a d-perfect sequence. %C A039982 Concatenation of the bit sequences forming A035263. - David Callan (callan(AT)stat.wisc.edu), Oct 08 2005 %D A039982 Martin Klazar and Florian Luca, On integrality and periodicity of the Motzkin numbers, Aequationes Math. 69 (2005), no. 1-2, 68-75. %H A039982 Martin Klazar and Florian Luca, On integrality and periodicity of the Motzkin numbers. %H A039982 D. Kohel, S. Ling and C. Xing, Explicit Sequence Expansions %F A039982 a(n) = A090344(n) mod 2 - Christian G. Bower (bowerc(AT)usa.net), Jun 12 2005 - Christian G. Bower (bowerc(AT)usa.net), Jun 12 2005 %F A039982 a(n) = M(2n) mod 2 where M(n) is the Motzkin number A001006. - David Callan (callan(AT)stat.wisc.edu), Oct 08 2005 %t A039982 substitutionRule={1->{1, 0}, 0->{1, 1}}; makeSubstitution[seq_]:=Flatten[seq/ .substitutionRule]; Flatten[NestList[makeSubstitution, {1}, 5]] %t A039982 NestList[Flatten[ # /. {0 -> {1, 1}, 1 -> {1, 0}}] &, {1}, 6] // Flatten (from Robert G. Wilson v (rgwv(at)rgwv.com), Mar 29 2006) %Y A039982 Cf. A035263. %Y A039982 Sequence in context: A093719 A153778 A065251 this_sequence A131372 A098457 A137161 %Y A039982 Adjacent sequences: A039979 A039980 A039981 this_sequence A039983 A039984 A039985 %K A039982 nonn %O A039982 1,1 %A A039982 N. J. A. Sloane (njas(AT)research.att.com). %E A039982 More terms from Christian G. Bower (bowerc(AT)usa.net), Jun 12 2005 Search completed in 0.001 seconds