数值计算一个极限可能吗？

elim

题：\(a_1 > 0,\;a_{n+1} = \ln(1+a_n)\)求\( \lim_{n\to\infty}\frac{n(na(n)-2)}{\ln n}\)
1 c( p! A+ R4 s9 v5 n
! f: P' p, d- x  l$ U这个数列 Mathematica 好像拒绝计算，而数学分析证明这个序列收敛极慢，若初始值为 1， 需迭代 10^140 次才有两位有效数字。但能处理这种计算量的机器还不存在。

对软件 pari/gp, 如何估计这种迭代的累计误差？ 谢谢指教。

: M: P* T) J  s" ^
: P, ^3 q+ Q% c2 {; g3 d5 }. j

elim

! B; t; b& k/ u' `1 v
7 k1 A6 s' U) x+ A. i- j0 X; B从分析的角度看，\(0 < a_{n+1} = \ln(1+a_n) < a_n,\;\{a_n\}\)是正项递减数列, 其极限满足方程\(0\le A=\ln(1+A).\;\therefore\;\lim_{n\to\infty}a_n = 0\)

; y# s& U# ^! ?+ Y6 x\(\lim_{n\to\infty} na_n = \lim_{n\to\infty}\frac{n}{a_n^{-1}}\overset{Stolz}{=}\lim_{n\to\infty}\frac{1}{a_{n+1}^{-1}-a_n^{-1}}=\lim_{n\to\infty}\frac{a_na_{n+1}}{a_n-a_{n+1}}=\lim_{x\to 0}\frac{x\ln(1+x)}{x-\ln(1+x)} = 2\)
5 q* t+ ~: e) U! M) ~& Z
( i2 [7 o: e# \" u* M\(\lim_{n\to\infty}\frac{n-\frac{2}{a_n}}{\ln n} \overset{Stolz}{=} \lim_{n\to\infty}\frac{1-2(a_{n+1}^{-1}-a_n^{-1})}{\ln(1+\frac{1}{n})}=\lim_{n\to\infty}\frac{a_n/6 + O(a_n^2)}{\ln(1+\frac{1}{n})}=\lim_{n\to\infty}\frac{na_n}{\ln(1+\frac{1}{n})^n}=\frac{1}{3}\)

0 `' t% ^! x7 E' V+ }\(\lim_{n\to\infty}\frac{n(na_n-2)}{\ln n} = \frac{2}{3}\)
: T, Y1 u# U! w0 V
6 t& J9 T( ^) [5 P0 f+ m4 Z好了，现在试试编个程序算算对很大的\(n,\;\frac{n(na_n-2)}{\ln n}\)是否非常接近于 2/3?
+ P- \' K% ?& X1 a. t
  V) P9 ^/ L' |* V4 k" f