A363402 a(n) = n * (4^n - 2^n) / Clausen(n, 0).
0, 2, 12, 56, 480, 992, 4032, 16256, 261120, 784896, 1047552, 4192256, 33546240, 67100672, 268419072, 1073709056, 34359214080, 17179738112, 206157643776, 274877382656, 2199021158400, 4398044413952, 17592181850112, 70368735789056, 1125899839733760, 5629499366440960
Offset: 0
Keywords
Programs
-
Maple
# Using function 'Clausen' from A160014. a := n -> n * (4^n - 2^n) / Clausen(n, 0): seq(a(n), n = 0..25);