cp's OEIS Frontend

A223093 Number of foldings of n labeled stamps in which leaf 1 is inwards and leaf n outwards (or leaf 1 outwards and leaf n inwards).

%I A223093 #44 Sep 08 2019 03:12:19
%S A223093 0,0,2,4,16,38,132,342,1144,3134,10370,29526,97458,285458,942920,
%T A223093 2822310,9341008,28440970,94358558,291294678,968853072,3025232480,
%U A223093 10086634316,31797822936,106265437078,337731551446,1131117792978,3620119437762,12148796744234,39118879440938
%N A223093 Number of foldings of n labeled stamps in which leaf 1 is inwards and leaf n outwards (or leaf 1 outwards and leaf n inwards).
%C A223093 Subset of foldings of n labeled stamps (A000136). - _Stéphane Legendre_, Apr 09 2013
%H A223093 Stéphane Legendre, <a href="/A223093/b223093.txt">Table of n, a(n) for n = 1..42</a>
%H A223093 S. Legendre, <a href="http://arxiv.org/abs/1302.2025">Foldings and Meanders</a>, arXiv preprint arXiv:1302.2025 [math.CO], 2013.
%H A223093 S. Legendre, <a href="http://ajc.maths.uq.edu.au/pdf/58/ajc_v58_p275.pdf">Foldings and Meanders</a>, Aust. J. Comb. 58(2), 275-291, 2014.
%H A223093 <a href="/index/Fo#fold">Index entries for sequences obtained by enumerating foldings</a>
%F A223093 a(n) = A000682(n+1) - A077014(n). - _Andrew Howroyd_, Dec 06 2015
%F A223093 A217310(n) = 2*a(n) if n is odd and A217310(n) = a(n) if n is even. - _Stéphane Legendre_, Jan 09 2014
%t A223093 A000682 = Cases[Import["https://oeis.org/A000682/b000682.txt", "Table"], {_, _}][[All, 2]];
%t A223093 A077014 = Cases[Import["https://oeis.org/A077014/b077014.txt", "Table"], {_, _}][[All, 2]];
%t A223093 a[n_] := A000682[[n + 1]] - A077014[[n + 1]];
%t A223093 Array[a, 30] (* _Jean-François Alcover_, Sep 07 2019, after _Andrew Howroyd_ *)
%K A223093 nonn
%O A223093 1,3
%A A223093 _N. J. A. Sloane_, Mar 29 2013
%E A223093 Name clarified by _Stéphane Legendre_, Apr 09 2013
%E A223093 More terms from _Stéphane Legendre_, Apr 09 2013