A092832 Prime Motzkin numbers (see A001006).

2, 127, 15511, 953467954114363

Offset

1,1

Links

Table of n, a(n) for n=1..4.

Joel A. Henningsen, Sequences Modulo Primes and Finite State Automata, Master's Thesis, University of South Alabama (2019).

Eric Weisstein's World of Mathematics, Motzkin Number

Mathematica

a[0]=1; a[n_Integer]:=a[n]=a[n-1]+Sum[a[k]*a[n-2-k], {k, 0, n-2}]; lst={}; Do[If[PrimeQ[p=a[n]], AppendTo[lst, p]], {n, 10^2}]; lst (* Vladimir Joseph Stephan Orlovsky, Aug 21 2008 *)

Crossrefs

Cf. A001006, A092831.

Sequence in context: A062588 A125634 A075596 * A181001 A105761 A157473

Adjacent sequences: A092829 A092830 A092831 * A092833 A092834 A092835

Keyword

nonn,more

Author

Eric W. Weisstein, Mar 06 2004

Status

approved