A081955 a(n) = 2^r*3^s where r = n(n+1)/2 and s = n(n-1)/2.
1, 2, 24, 1728, 746496, 1934917632, 30091839012864, 2807929681968365568, 1572081206902992767287296, 5280985496827154199640037916672, 106440332834866049138191223105387495424, 12872079797383178927229037635891253693013557248
Offset: 0
Keywords
Programs
-
Mathematica
Do[Print[2^(n*(n+1)/2)*3^(n*(n-1)/2)], {n, 10}] (* Ryan Propper, Jun 15 2005 *)
-
PARI
{a(n) = 3^(n*(n-1)/2) * 2^(n*(n+1)/2)} /* Michael Somos, Dec 17 2009 */
Formula
a(n+1) = 2^(n+1)*3^n*a(n), a(1) = 2. - Ryan Propper, Jun 15 2005
A171795(n) = a(-n). a(n+1) * a(n-1) = 6 * a(n)^2. - Michael Somos, Dec 17 2009
Extensions
More terms from Ryan Propper, Jun 15 2005