(* D'Agostino-Pearson Test for Nonnormality *)



data1=

{77.7331, 86.7357, 82.9031, 59.6612, 81.2474, 65.1297, 81.0629, 104.793, 

82.4776, 82.2584, 88.1696, 61.4329, 69.1927, 67.6756, 80.8268, 55.6229, 

68.5386, 83.3563, 54.261, 62.4938, 88.6138, 67.5976, 79.1755, 84.5068, 

73.3097, 68.8738, 65.9694, 86.1401, 85.2654, 63.6961}



data2=

{9.49794, 3.76105, 2.58316, 3.1983, 0.417378, 2.6296, 0.980215, 2.26886, 

12.7192, 0.639708, 1.25589, 2.6607, 2.17027, 2.5262, 3.95442, 4.39354, 

3.1799, 2.50287, 0.803577, 0.557738, 3.43366, 2.8698, 7.39507, 3.12274, 

1.19529, 2.981, 8.70338, 9.71008, 5.96435, 2.99968}