login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A092832
Prime Motzkin numbers (see A001006).
1
2, 127, 15511, 953467954114363
OFFSET
1,1
LINKS
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
Sequence in context: A062588 A125634 A075596 * A181001 A105761 A157473
KEYWORD
nonn,more
AUTHOR
Eric W. Weisstein, Mar 06 2004
STATUS
approved

  NODES
COMMUNITY 1
INTERN 1