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 A114752 #33 Dec 23 2024 14:53:42 %S A114752 1,2,5,4,9,6,13,8,17,10,21,12,25,14,29,16,33,18,37,20,41,22,45,24,49, %T A114752 26,53,28,57,30,61,32,65,34,69,36,73,38,77,40,81,42,85,44,89,46,93,48, %U A114752 97,50,101,52,105,54,109,56,113,58,117,60,121,62,125,64,129,66,133,68,137 %N A114752 a(2n)=2n, a(2n+1)=4n+1. %C A114752 Original definition (typos corrected): The following triangle contains n consecutive numbers beginning from n in ascending order if n is odd else in descending order. 1 3 2 3 4 5 7 6 5 4 5 6 7 8 9 11 10 9 8 7 6 ... Sequence contains the leading diagonal. %C A114752 Equals A133566 * [1,2,3,...]. - _Gary W. Adamson_, Sep 16 2007 %C A114752 The sequence satisfies a divisibility property described by E. Angelini on the SeqFan list, cf. link. - _M. F. Hasler_, Mar 22 2013 %C A114752 First difference of A014255 (shown easily from the Nurikabe property of that sequence, or by manipulating the linear recurrence representations). - _Allan C. Wechsler_, Oct 20 2022 %H A114752 Harvey P. Dale, <a href="/A114752/b114752.txt">Table of n, a(n) for n = 1..1000</a> %H A114752 Eric Angelini, <a href="https://web.archive.org/web/*/http://list.seqfan.eu/oldermail/seqfan/2013-March/010956.html">k-chunks sum and division by k</a>, post to the SeqFan list, Mar 22 2013. %H A114752 <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (0,2,0,-1). %F A114752 a(2n) = 2n, a(2n+1) = 4n+1. - _Joshua Zucker_, May 05 2006 %F A114752 G.f.: x*(1+2*x+3*x^2)/(1-x^2)^2. - _Philippe Deléham_, Mar 02 2012 %F A114752 a(n) = (3n-(n-1)*(-1)^n-1)/2. - _Bruno Berselli_, Mar 02 2012 %e A114752 Contribution by _M. F. Hasler_, Mar 22 2013: (Start) %e A114752 The triangle described in the original definition starts %e A114752 1 %e A114752 3 2 %e A114752 3 4 5 %e A114752 7 6 5 4 %e A114752 5 6 7 8 9 %e A114752 11 10 9 8 7 6. (End) %t A114752 With[{nn=40},Riffle[Range[1,4nn,4],Range[2,2nn,2]]] (* _Harvey P. Dale_, Apr 14 2017 *) %o A114752 (PARI) a(n)=n+if(n%2,n\2*2) \\ _Charles R Greathouse IV_, Oct 16 2015 %Y A114752 Cf. A114751, A114753, A133566, A014255 %K A114752 nonn,easy %O A114752 1,2 %A A114752 _Amarnath Murthy_, Nov 15 2005 %E A114752 More terms from _Joshua Zucker_, May 05 2006 %E A114752 Simpler definition from _M. F. Hasler_, Mar 22 2013