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 A123724 #11 Oct 03 2017 05:42:49 %S A123724 -1,0,-1,-2,-1,-2,-1,0,-1,0,-1,-2,-1,-2,-1,0,-1,0,-1,-2,-1,-2,-1,0,-1, %T A123724 0,1,0,1,0,-1,0,-1,0,1,0,1,0,-1,0,-1,0,1,0,1,0,-1,0,-1,0,1,0,1,2,1,2, %U A123724 1,0,1,0,1,2,1,2,1,0,1,0,1,2,1,2,1,0,1,0,-1,0,-1,0,1,0,1,0,-1,0,-1,0,1,0,1,0,-1,0,-1,0,1,0,1,0 %N A123724 Partial sums of (-1)^floor(n*2^(1/3)). %C A123724 Remarkably, these partial sums appear to have several periods of length 153008. This sum is not discussed by O'Bryant et al. %H A123724 T. D. Noe, <a href="/A123724/b123724.txt">Table of n, a(n) for n=1..40000</a> %H A123724 T. D. Noe, <a href="http://www.sspectra.com/math/A123724.png">Plot of 10^6 terms</a> %H A123724 Kevin O'Bryant, Bruce Reznick and Monika Serbinowska, <a href="https://arxiv.org/abs/math/0308087">Almost alternating sums</a>, arXiv:math/0308087 [math.NT], 2003-2005. %H A123724 Kevin O'Bryant, Bruce Reznick and Monika Serbinowska, <a href="http://www.jstor.org/stable/27642030">Almost alternating sums</a>, Amer. Math. Monthly, Vol. 113 (October 2006), 673-688. %t A123724 Rest[FoldList[Plus,0,(-1)^Floor[2^(1/3)*Range[120]]]] %t A123724 Accumulate[(-1)^Floor[Range[100]Surd[2,3]]] (* _Harvey P. Dale_, Apr 16 2015 *) %Y A123724 Cf. A123737 (sum for sqrt(2)), A123738 (sum for Pi), A123739 (sum for e). %K A123724 easy,nice,sign,look %O A123724 1,4 %A A123724 _T. D. Noe_, Oct 11 2006