OFFSET
1,1
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: for n from 0 to 400 do p := A153003(n) ; if isprime(p) then printf("%d, ", p) ; fi; od: # R. J. Mathar, Jul 13 2009
MATHEMATICA
CROSSREFS
KEYWORD
nonn
AUTHOR
Omar E. Pol, Jan 02 2009
EXTENSIONS
More terms from R. J. Mathar, Jul 13 2009
STATUS
approved