reviewed
approved
reviewed
approved
proposed
reviewed
editing
proposed
1, 1, 1, 4, 21, 131, 914, 6910, 55477, 466729, 4076430, 36712325, 339195058, 3202515525, 30803440806, 301094270964, 2984903334517, 29961600364523, 304094354787062, 3117138919265903, 32238856059792302, 336132907436386486, 3530470987229030696, 37330864330583904876, 397168915877285183906, 4249533314257706614641, 45706449449414088413122, 493987955498019277994743, 5363004181680921367192822
Jean-François Alcover, <a href="/A078591/b078591.txt">Table of n, a(n) for n = 0..28</a>
proposed
editing
editing
proposed
1, 1, 1, 4, 21, 131, 914, 6910, 55477, 466729, 4076430, 36712325, 339195058, 3202515525, 30803440806, 301094270964, 2984903334517, 29961600364523, 304094354787062, 3117138919265903, 32238856059792302, 336132907436386486, 3530470987229030696, 37330864330583904876, 397168915877285183906, 4249533314257706614641, 45706449449414088413122, 493987955498019277994743, 5363004181680921367192822
A005315 = Cases[Import["https://oeis.org/A005315/b005315.txt", "Table"], {_, _}][[All, 2]];
a[n_] := If[n < 3, 1, A005315[[n+1]]/2];
Table[a[n], {n, 0, 28}] (* Jean-François Alcover, Aug 10 2022, after Andrew Howroyd *)
a(21)-a(28) computed from A005315 added by Jean-François Alcover, Aug 10 2022
approved
editing
reviewed
approved
proposed
reviewed
editing
proposed
a(10)-a(20) added by Andrew Howroyd, Nov 23 2015
proposed
editing