|
Search: id:A080764
|
|
| |
|
| 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 0
(list; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
COMMENT
|
Fixed point of the morphism 0->{1}, 1->{1,1,0}. - Benoit Cloitre (benoit7848c(AT)orange.fr), May 31 2004
|
|
LINKS
|
Joerg Arndt, Fxtbook
|
|
MATHEMATICA
|
Nest[ Flatten[ # /. {0 -> 1, 1 -> {1, 1, 0}}] &, {1}, 7] (from Robert G. Wilson v (rgwv(AT)rgwv.com), Apr 16 2005)
NestList[ Flatten[ # /. {0 -> {1}, 1 -> {1, 0, 1}}] &, {1}, 5] // Flatten (* or *)
t = Table[Floor[n/Sqrt[2]], {n, 111}]; Drop[t, 1] - Drop[t, -1] (from Robert G. Wilson v (rgwv(at)rgwv.com), Nov 03 2005)
|
|
CROSSREFS
|
Sequence in context: A015923 A014768 A015527 this_sequence A014114 A014219 A065828
Adjacent sequences: A080761 A080762 A080763 this_sequence A080765 A080766 A080767
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Matthew Vandermast (ghodges14(AT)comcast.net), Mar 25 2003
|
|
|
Search completed in 0.002 seconds
|
