%I A133334
%S A133334 1,2,1,3,2,1,4,3,2,5,1,4,3,6,2,5,1,4,7,3,6,2,5,8,1,4,7,3,6,9,2,5,8,1,4,
%T A133334 7,10,3,6,9,2,5,8,11,1,4,7,10,3,6,9,12,2,5,8,11,1,4,7,10,13,3,6,9,12,2,
%U A133334 5,8,11,14,1,4,7,10,13,3,6,9,12,15,2,5,8,11,14,1,4,7,10,13,16
%N A133334 Signature sequence of e^(1/e) - the solution (the y value) to Steiner's 
               problem: find the max value attained by y=x^(1/x).
%D A133334 C. Kimberling - Signature sequences
%H A133334 T. D. Noe, <a href="b133334.txt">Table of n, a(n) for n=1..1000</a>
%t A133334 Take[Transpose[ Sort[Flatten[Table[{i + j*(E^(1/E)), i}, {i, 17}, {j, 
               15}], 1], #1[[1]] < #2[[1]] &]][[2]], 91]
%Y A133334 Sequence in context: A049085 A167287 A007336 this_sequence A003603 A135227 
               A104325
%Y A133334 Adjacent sequences: A133331 A133332 A133333 this_sequence A133335 A133336 
               A133337
%K A133334 nonn
%O A133334 1,2
%A A133334 Gregg K. Whisler (gwhisler(AT)msinnovation.info), Oct 19 2007