login
a(0) = 4; for n >= 1, a(n) = 2^n + 4.
1

%I #9 Jun 11 2024 07:51:12

%S 4,6,8,12,20,36,68,132,260,516,1028,2052,4100,8196,16388,32772,65540,

%T 131076,262148,524292,1048580,2097156,4194308,8388612,16777220,

%U 33554436,67108868,134217732,268435460,536870916,1073741828

%N a(0) = 4; for n >= 1, a(n) = 2^n + 4.

%C This is one of many possible ways to extend the Platonic solids sequence A053016.

%F a(n)=A140504(n), n>0. [From _R. J. Mathar_, Nov 05 2008]

%t v[n_] := 2*(If[n == 0, 0, 2^(n - 1)] + 2); Table[v[n], {n, 0, 30}]

%Y Cf. A053016, A342759.

%Y Essentially the same as A140504.

%K nonn,less

%O 0,1

%A _Roger L. Bagula_, Oct 30 2008

%E Edited by _N. J. A. Sloane_, Mar 21 2021