Basic Examples 
(3)
 

Generate a sequence of random integers:
In[1]:=
SeedRandom[1];​​sequence=RandomInteger[{0,1},1000];
Visualize the sequence:
In[2]:=
ArrayPlotPartition[sequence,16],

Out[2]=
Apply a runs-based test:
In[3]:=
[◼]
ArcsineLawRandomnessTest
[sequence,"TestStatistic"]
Out[3]=
119
500
In[4]:=
N@
[◼]
ArcsineLawRandomnessTest
[sequence,"PValue"]
Out[4]=
0.648878

Applications 
(2)
 


Possible Issues 
(1)
 


Neat Examples 
(1)
 
