Coordinates of the centers of the triangles composing a Koch snowflake [duplicate]

This question already has an answer here:

How do I obtain the coordinates of the centers of triangles composing the Koch snowflake?

marked as duplicate by MarcoB, Dr. belisarius, user9660, Edmund, m_goldbergJan 30 '16 at 0:58

Please search the site properly for existing answers before asking a new question. Following the answer by @Mark McClure here , getting the centers of the Koch snowflake triangles is a very easy job.

Centers at level n=2

(Mean /@ triangles[2])


Visualize them. Thx to the answer I linked above.

Graphics[{Table[{Darker[LightYellow, 1 - 1/1.2^(k - 1)],
EdgeForm[{Thin, Directive[Opacity@.3, Gray]}],
Polygon[triangles[k]], Darker[Red, 1 - 1/2^(k - 1)],
Point /@ (Mean /@ triangles[k])}, {k, 1, level}], {Orange,
Line[edges]}}]