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.
%I A279684 #21 Mar 03 2024 22:38:39 %S A279684 1,3,5,15,37,87,205,495,1173,2759,6493,15263,35749,83575,195181, %T A279684 455247,1060533,2468391,5740925,13342975,30993349,71956951,166991501, %U A279684 387397551,898427605,2083016071,4828379549,11189823071,25928070117,60069313847,139148806829 %N A279684 The maximum number of coins that can be processed in n weighings that all are real except for one LHR-coin starting in the heavy or real state. %C A279684 An LHR-coin is a coin that can change its weight periodically from light to heavy to real to light. %C A279684 Also the number of outcomes of n weighings that start with a balance and every even-numbered imbalance that is not the last one must be followed by a balance, or every odd-numbered imbalance that is not the last one must be followed by a balance. %H A279684 Tanya Khovanova and Konstantin Knop, <a href="https://arxiv.org/abs/1611.09201">Coins that Change Their Weights</a>, arXiv:1611.09201 [math.CO], 2016. %H A279684 <a href="/index/Rec#order_05">Index entries for linear recurrences with constant coefficients</a>, signature (3, -1, 1, -2, -8). %F A279684 a(n) = 3a(n-1) - a(n-2) + a(n-3) - 2a(n-4) - 8a(n-5). %F A279684 G.f.: (1 - 3*x^2 + 2*x^3 - 4*x^4)/((1 + x)*(1 - 2*x)*(1 - 2*x + x^2 - 4*x^3)). - _Ilya Gutkovskiy_, Dec 17 2016 %e A279684 If we have two weighings we are not allowed to have outcomes that consist of two imbalances. That means a(2) = 9 - 4 = 5. %e A279684 If we have three weighings we are not allowed the following outcomes: <<=, <<<, where any less-than sign can be interchanged with a greater-than sign. Thus a(3) = 27 - 4 - 8 = 15. %t A279684 LinearRecurrence[{3, -1, 1, -2, -8}, {1, 3, 5, 15, 37}, 30] %o A279684 (Magma) I:=[1,3,5,15,37]; [n le 5 select I[n] else 3*Self(n-1)- Self(n-2)+Self(n-3)-2*Self(n-4)-8*Self(n-5): n in [1..40]]; // _Vincenzo Librandi_, Dec 16 2016 %Y A279684 Cf. A279673, A279674, A279682, A279685. %K A279684 nonn %O A279684 0,2 %A A279684 _Tanya Khovanova_ and _Konstantin Knop_, Dec 16 2016