%I A000155 M1810 N0716
%S A000155 0,1,2,7,44,361,3654,44207,622552,10005041,180713290,3624270839,
%T A000155 79914671748,1921576392793,50040900884366,1403066801155039,
%U A000155 42142044935535536,1349948504738292193,45940391206037470098
%N A000155 Modified Bessel function K_n (1).
%D A000155 N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, 
               Academic Press, 1995 (includes this sequence).
%D A000155 N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 
               (includes this sequence).
%D A000155 M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, 
               National Bureau of Standards Applied Math. Series 55, 1964 (and various 
               reprintings), p. 429.
%H A000155 M. Abramowitz and I. A. Stegun, eds., <a href="http://www.nrbook.com/
               abramowitz_and_stegun/">Handbook of Mathematical Functions</a>, National 
               Bureau of Standards, Applied Math. Series 55, Tenth Printing, 1972 
               [alternative scanned copy].
%H A000155 <a href="Sindx_Be.html#Bessel">Index entries for sequences related to 
               Bessel functions or polynomials</a>
%p A000155 Digits := 60: A000155 := proc(n) round( evalf ( BesselK( n, 1) )); end;
%t A000155 Table[Round[BesselK[n, 1]], {n, 0, 18}] (*Chandler*)
%Y A000155 Sequence in context: A158107 A145073 A111561 this_sequence A077045 A128579 
               A001046
%Y A000155 Adjacent sequences: A000152 A000153 A000154 this_sequence A000156 A000157 
               A000158
%K A000155 nonn
%O A000155 0,3
%A A000155 N. J. A. Sloane (njas(AT)research.att.com).
%E A000155 Extended by Ray Chandler (rayjchandler(AT)sbcglobal.net), Nov 28 2006