%I #9 Feb 03 2023 04:54:09
%S 2,2,7,2,2,7,1,7,2,2,7,1,8,1,7,2,2,7,1,8,2,8,1,7,2,2,7,1,8,2,8,2,8,1,
%T 7,2,2,7,1,8,2,8,1,8,2,8,1,7,2,2,7,1,8,2,8,1,8,1,8,2,8,1,7,2,2,7,1,8,
%U 2,8,1,8,2,8,1,8,2,8,1,7,2
%N Triangle read by rows: row n lists the digits of A135696(n), the palindromic number with odd number of digits formed from the reflected decimal expansion of e.
%C Also, successive digits of the numbers A135696(n).
%e Triangle begins:
%e .............. 2
%e ........... 2, 7, 2
%e ........ 2, 7, 1, 7, 2
%e ..... 2, 7, 1, 8, 1, 7, 2
%e .. 2, 7, 1, 8, 2, 8, 1, 7, 2
%t Module[{nn=10,edg},edg=RealDigits[E,10,nn][[1]];Table[ Join[ Take[ edg,n], Reverse[ Take[edg,n-1]]],{n,nn}]]//Flatten (* _Harvey P. Dale_, Aug 13 2019 *)
%Y Decimal expansion of e: A001113. Cf. A135634, A135696, A138068.
%K easy,nonn,tabf,base
%O 1,1
%A _Omar E. Pol_, Mar 03 2008
|