|
%I #5 Sep 28 2018 22:45:30
%S 1,3,42,2208,244752,46518528,13507994112,5562729781248,
%T 3083754373711872,2214222213310906368,1999032386887572652032,
%U 2216366828444296453029888,2960497368303914832695918592,4689088728161336381621359607808,8689565950333823666093720497815552,18626301728606130165475133482365616128
%N P_{2n+1}(sqrt(2)) (see A155100).
%H G. C. Greubel, <a href="/A156108/b156108.txt">Table of n, a(n) for n = -1..207</a>
%t p[n_, u_]:= D[Tan[x], {x, n}] /. Tan[x] -> u /. Sec[x] -> Sqrt[1 + u^2] // Expand; p[-1, u_] = 1; Table[p[n, Sqrt[2]], {n, -1, 50}][[1 ;; ;; 2]] (* _G. C. Greubel_, Sep 28 2018 *)
%K nonn
%O -1,2
%A _N. J. A. Sloane_, Nov 05 2009
|
