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

4, 6, 8, 12, 20, 36, 68, 132, 260, 516, 1028, 2052, 4100, 8196, 16388, 32772, 65540, 131076, 262148, 524292, 1048580, 2097156, 4194308, 8388612, 16777220, 33554436, 67108868, 134217732, 268435460, 536870916, 1073741828

Offset: 0

Author

Roger L. Bagula, Oct 30 2008

Keywords

• nonn
• less

Comments

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

Crossrefs

Cf. A053016, A342759.

Essentially the same as A140504.

Programs

Mathematica

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

Formula

a(n)=A140504(n), n>0. [From R. J. Mathar, Nov 05 2008]

Extensions

Edited by N. J. A. Sloane, Mar 21 2021