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 A159966 #32 Nov 28 2023 10:57:26 %S A159966 0,3,2,1,4,7,6,5,8,11,10,9,12,15,14,13,16,19,18,17,20,23,22,21,24,27, %T A159966 26,25,28,31,30,29,32,35,34,33,36,39,38,37,40,43,42,41,44,47,46,45,48, %U A159966 51,50,49,52,55,54,53,56,59,58,57,60,63,62,61,64,67,66,65,68,71,70,69,72 %N A159966 Lodumo_4 of A102370 (sloping binary numbers). %C A159966 A permutation of the nonnegative integers. %C A159966 A092486 preceded by a zero. - _Philippe Deléham_, May 05 2009 %C A159966 Fixed points are the even numbers. - _Wesley Ivan Hurt_, Oct 16 2015 %H A159966 G. C. Greubel, <a href="/A159966/b159966.txt">Table of n, a(n) for n = 0..10000</a> %H A159966 OEIS wiki, <a href="https://oeis.org/wiki/Lodumo_transform">Lodumo transform</a>. %H A159966 <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (2,-2,2,-1). %H A159966 <a href="/index/Per#IntegerPermutation">Index entries for sequences that are permutations of the natural numbers</a>. %F A159966 a(n) = lod_4 (A102370(n)). %F A159966 From _Wesley Ivan Hurt_, Oct 16 2015: (Start) %F A159966 G.f.: (3*x-4*x^2+3*x^3)/((x-1)^2*(1+x^2)). %F A159966 a(n) = 2*a(n-1)-2*a(n-2)+2*a(n-3)-a(n-4), n>3. %F A159966 a(n) = n-(1-(-1)^n)*(-1)^((2*n+1-(-1)^n)/4). %F A159966 a(2n) = A005843(n); a(2n+1) = A166549(n). %F A159966 a(n+1) - a(n) = A132429(n)*(-1)^n. (End) %F A159966 Sum_{n>=1} (-1)^(n+1)/a(n) = log(2) (A002162). - _Amiram Eldar_, Nov 28 2023 %p A159966 A159966:=n->n-(1-(-1)^n)*(-1)^((2*n+1-(-1)^n)/4): seq(A159966(n), n=0..100); # _Wesley Ivan Hurt_, Oct 16 2015 %t A159966 Table[n - (1 - (-1)^n) (-1)^((2 n + 1 - (-1)^n)/4), {n, 0, 40}] (* or *) CoefficientList[Series[(3 x - 4 x^2 + 3 x^3)/((x - 1)^2 (1 + x^2)), {x, 0, 100}], x] (* _Wesley Ivan Hurt_, Oct 16 2015 *) %t A159966 LinearRecurrence[{2,-2,2,-1},{0,3,2,1},80] (* _Harvey P. Dale_, Jul 02 2022 *) %o A159966 (Magma) [n-(1-(-1)^n)*(-1)^((2*n+1-(-1)^n) div 4) : n in [0..100]]; // _Wesley Ivan Hurt_, Oct 16 2015 %o A159966 (PARI) concat(0, Vec((3*x-4*x^2+3*x^3)/((x-1)^2*(1+x^2)) + O(x^100))) \\ _Altug Alkan_, Oct 17 2015 %Y A159966 Cf. A002162, A005843, A102370, A132429, A158459, A166549. %K A159966 easy,nonn,less,base %O A159966 0,2 %A A159966 _Philippe Deléham_, Apr 28 2009