# terminalset terminal svg size 650,350 enhanced font 'Liberation Sans, Helvetica, Arial, sans-serif,10'set output 'qtails-serif.svg'set title 'Q tails (serif)' font "Liberation Sans Bold,16"filename = 'qtails.csv'rowi = 1rowf = 7# obtain sum(column(2)) from rows `rowi` to `rowf`set datafile separator '\t'stats filename u 2 every ::rowi::rowf noout prefix "A"# rowf should not be greater than length of filerowf = (rowf-rowi > A_records - 1 ? A_records + rowi - 1 : rowf)angle(x)=x*360/A_sumpercentage(x)=x*100/A_sum# circumference dimensions for pie-chartcenterX=0centerY=0radius=1# label positionsyposmin = 0.0yposmax = 0.95*radiusxpos = 1.5*radiusypos(i) = yposmax - i*(yposmax-yposmin)/(1.0*rowf-rowi)#-------------------------------------------------------------------# now we can configure the canvasset style fill solid 1     # filled pie-chartunset key                  # no automatic labelsunset tics                 # remove ticsunset border               # remove borders; if some label is missing, comment to see what is happeningset size ratio -1              # equal scale lengthset xrange [-radius:2*radius]  # [-1:2] leaves space for labelsset yrange [-radius:radius]    # [-1:1]#-------------------------------------------------------------------pos = 0             # init anglecolour = 0          # init colour# 1st line: plot pie-chart# 2nd line: draw colored boxes at (xpos):(ypos)# 3rd line: place labels at (xpos+offset):(ypos)plot filename u (centerX):(centerY):(radius):(pos):(pos=pos+angle($2)):(colour=colour+1) every ::rowi::rowf w circle lc var,\     for [i=0:rowf-rowi] '+' u (xpos):(ypos(i)) w p pt 5 ps 4 lc i+1,\     for [i=0:rowf-rowi] filename u (xpos):(ypos(i)):(sprintf('%.2f%% %s', percentage($2), stringcolumn(1))) every ::i+rowi::i+rowi w labels left offset 3