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 A083501 #5 Aug 23 2014 14:08:50 %S A083501 2,3,4,5,6,7,4,9,7,11,12,13,9,9,16,17,18,7,11,21,16,23,24,25,26,9,10, %T A083501 25,30,31,25,33,34,35,11,13,26,39,16,41,42,25,36,45,16,47,48,49,18,51, %U A083501 52,29,54,19,56,25,49,59,60,61,47,25,16,65,61,67,29,69,70,51,72,25,64,47 %N A083501 Cube roots arising in A083500. %C A083501 a(n) < n+1 and a(n) = n+1 over half of the time. %t A083501 Do[k = 0; While[i = n(n + k) + 1; ! IntegerQ[i^(1/3)], k++ ]; Print[i^(1/3)], {n, 1, 75}] %Y A083501 Cf. A083500. %K A083501 nonn %O A083501 1,1 %A A083501 _Amarnath Murthy_ and Meenakshi Srikanth (menakan_s(AT)yahoo.com), May 03 2003 %E A083501 Edited and extended by _Robert G. Wilson v_, May 11 2003