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 A095394 #8 Oct 15 2013 22:32:25 %S A095394 1,1,2,3,3,4,5,6,7,8,9,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24, %T A095394 24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46, %U A095394 47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,61,62,63,64,65,66,67,68 %N A095394 a(n) = Floor[n^((n)/(n+1))], integer part of n^x where x = n/(n+1) < 1. %C A095394 1, 3, 9, 24, 61, 160, 420, 1120, ... appear in the sequence twice. The ratio of such numbers converges to e. [_Charles R Greathouse IV_, Oct 26 2011] %t A095394 Table[Floor[N[x^((x+1)/(x)), 50]], {x, 1, 15}] %o A095394 (PARI) a(n)=floor(n^(n/(n+1.))) \\ _Charles R Greathouse IV_, Oct 26 2011 %Y A095394 Cf. A059921. %K A095394 nonn %O A095394 1,3 %A A095394 _Labos Elemer_, Jun 17 2004