%I #16 Sep 08 2022 08:45:48
%S 1,5,65,6305,42981185,1853015893884545,
%T 3433683820274065740584139537665,
%U 11790184577738583171520532579045597727214748217668409340885505
%N a(n) = 3^(2^n) - 2^(2^n).
%F a(n)= A001047(2^n).
%p A167536 := proc(n) 3^(2^n)-2^(2^n) ; end proc: seq(A167536(n),n=1..10) ; # _R. J. Mathar_, Nov 07 2009
%t a[n_]:= 2^n; Table[3^a[n] - 2^a[n], {n, 0, 10}] (* _G. C. Greubel_, Jun 14 2016 *)
%t Table[3^(2^n) - 2^(2^n), {n, 0, 10}] (* _Vincenzo Librandi_, Jun 15 2016 *)
%o (Magma) [3^(2^n)-2^(2^n): n in [0..10]]; // _Vincenzo Librandi_ Jun 15 2016
%Y Cf. A118004.
%K nonn
%O 0,2
%A _Jamel Ghanouchi_, Nov 06 2009
%E Edited by _R. J. Mathar_, Nov 11 2009
%E Offset changed from 1 to 0 from _Vincenzo Librandi_, Jun 15 2016