In a recent post, we have seen (thanks to @kglr) how to create a custom pie chart
Clear["Global`*"];
coloring =
Thread[{-1, -2, 0, 1, 2, 9} -> {Yellow, Purple, Green, Blue, Red, Cyan}];
data = {0, 0, -1, 1, 1, 2, 9, -2, 2, 1, 1, 1, 0, 0, 9, 9, -1, 0, 9, 2};
PieChart[ConstantArray[1, Length@data],
SectorOrigin -> {{\[Pi]/2, "Clockwise"}, 1},
ChartStyle -> (data /. coloring), ChartBaseStyle -> EdgeForm[None]]
The above approach works very well when the dat file contains a list of integer numbers.
Now let's consider a two-dimensional data where the first row indicates the time, while the second row is the classification integer.
data2 = {{1, 0}, {2, 0}, {3, -1}, {4, 1}, {5, 1}, {6, 2}, {7, 9},
{8, -2}, {9, 2}, {10, 1}, {11, 1}, {12, 1}, {13, 0},
{14, 0}, {15, 9}, {16, 9}, {17, -1}, {18, 0}, {19, 9},
{20, 2}};
I would like the following: wrap a curved axis around the pie chart indicating the time, let's say by printing the corresponding time every two steps (i.e., printing the values 0, 2, 4, 6, 8, ...) above the corresponding sectors of the pie chart. Any ideas?