A060032 Fixed point of the morphism 1 -> 121, 2 -> 122, starting from 1.
1, 121, 121122121, 121122121121122122121122121, 121122121121122122121122121121122121121122122121122122121122121121122122121122121
Offset: 0
Keywords
Examples
a(2) = ana = 121, a(3) = ana ann ana = 121122121.
References
- C. Pickover, Wonders of Numbers, Chap. 69 "An A?", Oxford University Press, NY, 2001, p. 167-171.
Links
- Joseph L. Pe, Ana's Golden Fractal, Fractals, Vol. 11, No. 4 (2003) 309-313.
- C. A. Pickover, "Wonders of Numbers, Adventures in Mathematics, Mind and Meaning," Zentralblatt review
Crossrefs
Cf. A060236.
Programs
-
Mathematica
f[n_] := FromDigits[ Nest[ Flatten[ # /. {1 -> {1, 2, 1}, 2 -> {1, 2, 2}}] &, {1}, n]]; Table[ f[n], {n, 0, 4}] (* Robert G. Wilson v, Mar 05 2005 *)
Formula
Begin with the letter "a". Generate next term by using the indefinite article as appropriate, e.g., "an a", then "an a, an n, an a" etc. Assign a=1, n=2.
Extensions
Additional comments from Joseph L. Pe, Mar 11 2002
More descriptive name from comment, Joerg Arndt, Jan 23 2024
Comments