|
Search: id:A102005
|
|
|
| A102005 |
|
Fixed point of the morphism 1 -> 12, 2 -> 111. |
|
+0 1
|
|
| 1, 2, 1, 1, 1, 1, 2, 1, 2, 1, 2, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1, 1, 2, 1, 2, 1, 2, 1, 2, 1, 1, 1, 1, 2, 1, 2, 1, 2, 1, 2, 1, 1, 1, 1, 2, 1, 2, 1, 2, 1, 2, 1, 1, 1, 1, 2, 1, 2, 1, 2, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1, 1, 2, 1, 1, 1, 1, 2, 1, 2, 1, 2, 1, 2, 1, 1, 1, 1, 2, 1, 1
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
COMMENT
|
A binary non-Pisot sequence.
|
|
REFERENCES
|
A. Hof, O. Knill and B. Simon, Singular continuous spectrum for palindromic Schroedinger operators, Commun. Math. Phys. 174 (1995), 149-159.
|
|
MAPLE
|
f:=proc(n) if n=1 then 1, 2 elif n=2 then 1, 1, 1 else fi end: g[1]:=[1]: for n from 2 to 7 do g[n]:=map(f, g[n-1]) od: g[7]; (Deutsch)
|
|
MATHEMATICA
|
Nest[ Function[l, {Flatten[(l /. {1 -> {1, 2}, 2 -> {1, 1, 1}})]}], {1}, 6] (from Robert G. Wilson v Feb 26 2005)
|
|
CROSSREFS
|
Sequence in context: A115721 A138330 A128591 this_sequence A051700 A025892 A025883
Adjacent sequences: A102002 A102003 A102004 this_sequence A102006 A102007 A102008
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
njas, Feb 03 2005
|
|
EXTENSIONS
|
More terms from Emeric Deutsch (deutsch(AT)duke.poly.edu), Feb 23 2005
|
|
|
Search completed in 0.002 seconds
|