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.

A086116 Numerator of mean deviation of a symmetrical binomial distribution on n elements.

This page as a plain text file.
%I A086116 #19 Feb 16 2025 08:32:50
%S A086116 1,1,3,3,15,15,35,35,315,315,693,693,3003,3003,6435,6435,109395,
%T A086116 109395,230945,230945,969969,969969,2028117,2028117,16900975,16900975,
%U A086116 35102025,35102025,145422675,145422675,300540195,300540195,9917826435
%N A086116 Numerator of mean deviation of a symmetrical binomial distribution on n elements.
%C A086116 From _Mohamed Sabba_, Apr 24 2023: (Start)
%C A086116 The numerators of this sequence and denominators (A086117) appear in NMR and spin physics as half of the symmetry-constrained upper bound on polarization transfer in AXn spin-1/2 systems. For example:
%C A086116 (a) in AX3 and AX4 spin systems, the maximum achievable transfer from Xz to Az is 3/2 = (2*3/4).
%C A086116 (b) in AX5 and AX6 spin systems, the maximum achievable transfer from Xz to Az is 15/8 = (2*15/16).
%C A086116 Note that this is different from the related adiabatic polarization transfer bounds, given by A141244.
%C A086116 (End)
%H A086116 Ole W. Sørensen, <a href="https://doi.org/10.1016/0022-2364(90)90278-H">A universal bound on spin dynamics</a>, Journal of Magnetic Resonance, 86:2 (1990) (equations 20 and 21)
%H A086116 Ole W. Sørensen, <a href="/A086116/a086116.jpg">Polarization transfer experiments in high-resolution NMR spectroscopy</a>, Progress in Nuclear Magnetic Resonance Spectroscopy, 21:6 (1989), (page 534)
%H A086116 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/RandomWalk1-Dimensional.html">Random Walk 1-Dimensional</a>
%H A086116 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/BinomialDistribution.html">Binomial Distribution</a>
%t A086116 Numerator[Table[If[OddQ[n], n!!/2/(n-1)!!, (n-1)!!/2/(n-2)!! ], {n, 50}]]
%Y A086116 Cf. A001803, A086117, A141244.
%K A086116 nonn,frac
%O A086116 1,3
%A A086116 _Eric W. Weisstein_, Jul 10 2003