allres
In[]:=
Out[]=
Map[Last/@#&,allres]
In[]:=
Out[]=
N[Count[#,Null]/Length[#]]&/@%
In[]:=
{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.}
Out[]=
ListLinePlot[%]
In[]:=
Out[]=
Level[{"A""B","BA""B","B""B","A""A"},{-1}]
In[]:=
{A,B,BA,B,B,B,A,A}
Out[]=
{StringLength[StringJoin[Level[First[#],{-1}]]],#[[2]]}&/@Catenate[allres]
In[]:=
Out[]=
GatherBy[%,First]
In[]:=
Out[]=
Map[Last/@#&,%]
In[]:=
Out[]=
Counts/@%
In[]:=
totals={<|11|>,12,13,118,Null2,133,Null11,1153,Null45,22,1330,Null203,34,216,11238,Null708,410,2124,322}
In[]:=
{11,12,13,118,Null2,133,Null11,1153,Null45,22,1330,Null203,34,216,11238,Null708,410,2124,322}
Out[]=
(Table[Lookup[#,n,0],{n,4}]/Total[#]&/@totals)
In[]:=
{1,0,0,0},{1,0,0,0},{1,0,0,0},
9
10
,0,0,0,
3
4
,0,0,0,
153
200
,
1
100
,0,0,
330
553
,
16
553
,
4
553
,0,
619
1051
,
62
1051
,
11
1051
,
5
1051

Out[]=
BarChart[%,ChartLayout"Stacked"]
In[]:=
Out[]=
133,Null11/44
In[]:=
1
3
4
,Null
1
4

Out[]=
Length[%]
In[]:=
7
Out[]=
BarChart[