OFFSET
1,2
LINKS
David Applegate, Omar E. Pol and N. J. A. Sloane, The Toothpick Sequence and Other Sequences from Cellular Automata, Congressus Numerantium, Vol. 206 (2010), 157-191. [There is a typo in Theorem 6: (13) should read u(n) = 4.3^(wt(n-1)-1) for n >= 2.]
N. J. A. Sloane, Catalog of Toothpick and Cellular Automata Sequences in the OEIS
MAPLE
read("transforms3") : a139250 := BFILETOLIST("b139250.txt") : A139250 := proc(n) global a139250; op(n+1, a139250) ; end: A153003 := proc(n) if n =0 then 0; else 1+3/4*(A139250(n+1)-3) ; fi; end: A153004 := proc(n) A153003(n)-A153003(n-1) ; end: rec := -1 ; for n from 1 to 3000 do t := A153004(n) ; if t > rec then printf("%d, ", t) ; rec := t; fi; od: # R. J. Mathar, Jul 13 2009
CROSSREFS
KEYWORD
nonn
AUTHOR
Omar E. Pol, Jan 02 2009
EXTENSIONS
More terms from R. J. Mathar, Jul 13 2009
STATUS
approved