Многоугольные числа
Многоугольные числа являются разновидностью фигурных чисел. Они включают треугольные числа, квадратные числа, а также фигуры с любым количеством углов.
Запросить первые 10 треугольных чисел.
In[1]:=

Table[PolygonalNumber[n], {n, 1, 10}]
Out[1]=

Запросить десятое r-угольное число для нескольких правильных многоугольников.
In[2]:=

Table[PolygonalNumber[r, 10], {r, 3, 10}]
Out[2]=

Многоугольное число представляет количество равноудалённых точек в правильном геометрическом распределении определенного типа.
код на языке Wolfram Language целиком
In[5]:=

PolygonalNumber[3, 4]
polygonalNumberGraphics[3, 4]
Out[5]=

Out[5]=

In[6]:=

PolygonalNumber[3, 6]
polygonalNumberGraphics[3, 6]
Out[6]=

Out[6]=

In[7]:=

PolygonalNumber[6, 5]
polygonalNumberGraphics[6, 5]
Out[7]=

Out[7]=
