In[]:=
allres
Out[]=
In[]:=
Map[Last/@#&,allres]
Out[]=
In[]:=
N[Count[#,Null]/Length[#]]&/@%
Out[]=
{0.,0.,0.,0.333333,0.,0.,0.4,0.25,0.333333,0.,0.35,0.45,0.25,0.416667,0.,0.2,0.45,0.,0.,0.361111,0.444444,0.2,0.45,0.35,0.425,0.2,0.625,0.425,0.305556,0.472222,0.3125,0.5,0.,0.333333,0.444444,0.15,0.475,0.513889,0.361111,0.458333,0.152778,0.75,0.361111,0.,0.125,0.55,0.305556,0.541667,0.277778,0.569444,0.527778,0.3125,0.583333,0.166667,0.1,0.225,0.4125,0.55,0.}
In[]:=
ListLinePlot[%]
Out[]=
In[]:=
Level[{"A""B","BA""B","B""B","A""A"},{-1}]
Out[]=
{A,B,BA,B,B,B,A,A}
In[]:=
{StringLength[StringJoin[Level[First[#],{-1}]]],#[[2]]}&/@Catenate[allres]
Out[]=
In[]:=
GatherBy[%,First]
Out[]=
In[]:=
Map[Last/@#&,%]
Out[]=
In[]:=
Counts/@%
In[]:=
totals={<|11|>,12,13,118,Null2,133,Null11,1153,Null45,22,1330,Null203,34,216,11238,Null708,410,2124,322}
Out[]=
{11,12,13,118,Null2,133,Null11,1153,Null45,22,1330,Null203,34,216,11238,Null708,410,2124,322}
In[]:=
(Table[Lookup[#,n,0],{n,4}]/Total[#]&/@totals)
Out[]=
{1,0,0,0},{1,0,0,0},{1,0,0,0},,0,0,0,,0,0,0,,,0,0,,,,0,,,,
9
10
3
4
153
200
1
100
330
553
16
553
4
553
619
1051
62
1051
11
1051
5
1051
In[]:=
BarChart[%,ChartLayout"Stacked"]