如何在我的情节中添加点标签？

Question

下面我试图绘制3维的结点。我想按顺序标记p1，p2，p3 ...... p6中的每个点，或者甚至只需1,2,3，... 6就足够了。我该怎么做？

`

P1 = {0.300775, 1.301248, -0.702434}
P2 = {-0.976281, -0.910795 , 0.701983}
P3 = {0.976171, -0.910795, -0.702076}
P4 = {-0.300495 , 1.300967, 0.702620}
P5 = {-1.276451, -0.390204, -0.702474}
P6 =  {1.276282, -0.390420 , 0.702381}
Knot = {P1, P2, P3, P4, P5, P6, P1}
Show[
 Graphics3D[Line[Knot]],
 Graphics3D[Point[Knot]],
 Axes -> True, 
 AxesLabel -> {x, y, z}]

`

以下是输出图片：

Answer 1

    Show[Graphics3D[Line[Knot]], 
 Graphics3D[
  MapIndexed[Text[Style["P" <> ToString[#2[[1]]], Medium, Red], #,{-1,-1}] &, 
   Knot[[;;-2]]]], Graphics3D[Point[Knot]], Axes -> True, 
 AxesLabel -> {x, y, z}]

不幸的是，在3d中获取文本实际上很难看起来很难。

这是没有风格的地图，使其更容易理解。

MapIndexed[Text["P" <> ToString[ #2[[1]] ], #] &