Comparative distribution of recipe lengths: foreach f ( bencao.Bencao vstars.Voynich ) foreach type ( avg dif ) cat ${f:r}.twct \ | gawk \ ' BEGIN { split("", htk); split("", hwd); maxk = 0; } \ /./{ \ tk = $3; htk[tk]++; wd = $4; hwd[wd]++; \ if (tk > maxk) { maxk = tk; } \ } \ END{ \ for(k=0; k <= maxk; k++) \ { printf "%3d %5d %5d\n", k, htk[k], hwd[k]; } \ } \ ' \ > ${f:r}-tk-wd.hist end end foreach fmt ( png ) foreach type ( tk.2 wd.3 ) plot-recipe-attr \ -format ${fmt} \ bencao-tk-wd.hist "Bencao (${type:r})" ${type:e} 1 1.000 \ vstars-tk-wd.hist "Voynich (${type:r})" ${type:e} 2 1.000 \ > recipe-tk-counts-srt.${fmt} end end