This site is supported by donations to The OEIS Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A173537 a(n) = A173522(n)/2. 1
 2, 4, 7, 10, 13, 17, 23, 28, 31, 35, 41, 47, 53, 61, 73, 82, 85, 89, 95, 101, 107, 115, 127, 137, 143, 151, 163, 175, 187, 203, 227, 244, 247, 251, 257, 263, 269, 277, 289, 299, 305, 313, 325, 337, 349, 365, 389, 407, 413, 421, 433, 445, 457, 473, 497, 517, 529, 545, 569, 593, 617, 649, 697, 730, 733, 737, 743, 749, 755, 763, 775, 785, 791, 799, 811, 823, 835 (list; graph; refs; listen; history; text; internal format)
 OFFSET 2,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 MATHEMATICA f[n_] := f[n] = Sum[Binomial[1, n - k] Mod[ Binomial[k, j], 2], {k, 0, n}, {j, 0, k}]; g[n_] := Sum[f@k, {k, 0, n}]; Array[g, 77]/2 CROSSREFS Cf. A105321, A139250, A173522. Sequence in context: A061465 A126022 A194172 * A049983 A168112 A170894 Adjacent sequences:  A173534 A173535 A173536 * A173538 A173539 A173540 KEYWORD nonn AUTHOR Omar E. Pol, May 29 2010 EXTENSIONS I changed the title (its index), the offset, extended the sequence and added the Mathematica coding Robert G. Wilson v, Jun 28 2010 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified February 17 20:18 EST 2019. Contains 320223 sequences. (Running on oeis4.)