cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

Showing 1-2 of 2 results.

A294688 Palindromes in Narayana's cows sequence (A000930).

Original entry on oeis.org

1, 2, 3, 4, 6, 9, 88, 595
Offset: 1

Views

Author

Chai Wah Wu, Nov 06 2017

Keywords

Comments

595 is probably the last term.

Crossrefs

Cf. A000930, A002113, A045504, A055391.

Programs

  • Maple
    a := proc(n) if n < 4 then n else
simplify(hypergeom([-n/3, (1-n)/3, (-1-n)/3], [-n/2, (-1-n)/2], -27/4));
convert(%, base, 10); ListTools:-Reverse(%);
if %% = % then add(%[k]*10^(k-1), k=1..nops(%)) else NULL fi fi end:
seq(a(n), n=1..200); # Peter Luschny, Nov 07 2017

A294720 Palindromes in tribonacci sequence with initial values 0,1,0 (A001590).

Original entry on oeis.org

0, 1, 2, 3, 6, 11, 7256527
Offset: 1

Views

Author

Chai Wah Wu, Nov 07 2017

Keywords

Comments

7256527 is probably the last term.

Crossrefs

Cf. A001590, A045504, A055391, A294688.

Programs

  • Mathematica
    a = c = 0; b = 1; lst = {0}; While[a < 10^7, d = a + b + c; If[ Reverse[idn = IntegerDigits[d]] == idn, AppendTo[lst, d]]; a = b; b = c; c = d]; lst (* Robert G. Wilson v, Nov 09 2017 *)
Showing 1-2 of 2 results.

Started in 1964 by Neil J. A. Sloane | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement.