A308875 - OEIS

%I #12 Jul 20 2019 12:45:53

%S 4,6,8,12,20,5,8,16,24,120,600,6,10,32,7,12,64,8,14,128,9,16,256,10,

%T 18,512,11,20,1024,12,22,2048,13,24,4096,14,26,8192,15,28,16384,16,30,

%U 32768,17,32,65536,18,34,131072,19,36,262144,20,38,524288,21,40,1048576

%N Irregular table read by rows: the n-th row lists the number of (n-1)-dimensional cells in the convex regular n-dimensional polytopes in ascending order, n >= 3.

%C Also, the n-th row lists the number of edges (i.e., 1-dimensional cells) in the convex regular n-dimensional polytopes in ascending order. - _Jianing Song_, Jun 29 2019

%H Wikipedia, <a href="https://en.wikipedia.org/wiki/List_of_regular_polytopes_and_compounds">List of regular polytopes and compounds</a>

%F For n >= 5, the n-th row is n+1, 2n, 2^n. - _Jianing Song_, Jun 29 2019

%e From _Jianing Song_, Jun 29 2019: (Start)

%e Row 3: 4, 6, 8, 12, 20;

%e Row 4: 5, 8, 16, 24, 120, 600;

%e Row 5: 6, 10, 32;

%e Row 6: 7, 12, 64;

%e ...

%e (End)

%o (PARI) row(n) = if(n>=5, [n+1, 2*n, 2^n], if(n==3, [4, 6, 8, 12, 20], if(n==4, [5, 8, 16, 24, 120, 600])))

%o list(n) = my(v=[]); for(i=3, n, v=concat(v, row(i))); v \\ _Jianing Song_, Jun 29 2019

%Y Cf. A000079, A005843, A053016 (row 3), A063924 (row 4).

%K nonn,easy,tabf

%O 3,1

%A _Donghwi Park_, Jun 29 2019

%E Edited by _Jianing Song_, Jun 29 2019