<< Statistics`DescriptiveStatistics`

Dat = {0.21`, 0.03`, 0.05`, 0.11`, 0.59`, 0.06`, 0.18`, 0.55`, 0.37`, 
          0.09`, 0.14`, 0.19`, 0.02`, 0.14`, 0.09`, 0.05`, 0.15`, 0.23`, 
          0.15`, 0.08`, 0.24`, 0.16`, 0.06`, 0.11`, 0.15`, 0.09`, 0.03`, 
          0.21`, 0.02`, 0.14`, 0.24`, 0.29`, 0.16`, 0.07`, 0.07`, 0.04`, 
          0.02`, 0.15`, 0.12`, 0.26`, 0.15`, 0.33`, 0.06`, 0.51`, 0.11`, 
          0.28`, 0.36`, 0.14`, 0.55`, 0.28`, 0.04`, 0.01`, 0.94`, 0.73`, 
          0.05`, 0.07`, 0.11`, 0.38`, 0.21`, 0.49`, 0.38`, 0.38`, 0.01`, 
          0.06`, 0.13`, 0.06`, 0.01`, 0.16`, 0.05`, 0.1`, 0.16`, 0.06`, 
          0.06`, 0.06`, 0.06`, 0.11`, 0.44`, 0.05`, 0.09`, 0.04`, 0.27`, 
          0.5`, 0.25`, 0.25`, 0.08`, 0.01`, 0.7`, 0.04`, 0.08`, 0.16`, 0.38`, 
          0.08`, 0.32`, 0.39`, 0.58`, 0.56`, 0.74`, 0.15`, 0.07`, 0.26`, 
          0.25`, 0.01`, 0.17`, 0.64`, 0.61`, 0.15`, 0.26`, 0.03`, 0.05`, 
          0.34`, 0.07`, 0.1`, 0.09`, 0.02`, 0.3`, 0.07`, 0.12`, 0.01`, 0.16`, 
          0.14`, 0.49`, 0.07`, 0.11`, 0.35`, 1.21`, 0.17`, 0.01`, 0.35`, 
          0.45`, 0.07`, 0.93`, 0.04`, 0.96`, 0.14`, 1.38`, 0.15`, 0.01`, 
          0.05`, 0.23`, 0.31`, 0.05`, 0.05`, 0.29`, 0.01`, 0.74`, 0.3`, 
          0.09`, 0.02`, 0.19`, 0.47`, 0.01`, 0.51`, 0.12`, 0.12`, 0.43`, 
          0.32`, 0.09`, 0.2`, 0.03`, 0.05`, 0.13`, 0.15`, 0.05`, 0.08`, 
          0.04`, 0.09`, 0.1`, 0.1`, 0.26`, 0.07`, 0.68`, 0.15`, 0.01`, 0.27`, 
          0.05`, 0.03`, 0.4`, 0.04`, 0.21`, 0.29`, 0.24`, 0.08`, 0.23`, 0.1`, 
          0.19`, 0.2`, 0.26`, 0.06`, 0.4`, 0.51`, 0.15`, 1.1`, 0.16`, 0.78`, 
          0.04`, 0.27`, 0.35`, 0.71`, 0.15`, 0.29`, 0.04`, 0.01`, 0.28`, 
          0.21`, 0.09`, 0.17`, 0.09`, 0.17`, 0.15`, 0.62`, 0.5`, 0.07`, 
          0.39`, 0.28`, 0.2`, 0.34`, 0.16`, 0.65`, 0.04`, 0.67`, 0.1`, 0.51`, 
          0.26`, 0.07`, 0.71`, 0.11`, 0.47`, 0.02`, 0.38`, 0.04`, 0.43`, 
          0.11`, 0.23`, 0.14`, 0.08`, 1.12`, 0.5`, 0.25`, 0.18`, 0.12`, 
          0.02`, 0.15`, 0.12`, 0.08`, 0.38`, 0.22`, 0.16`, 0.04`, 0.58`, 
          0.05`, 0.07`, 0.28`, 0.27`, 0.24`, 0.07`, 0.02`, 0.27`, 0.27`, 
          0.16`, 0.05`, 0.34`, 0.1`, 0.02`, 0.04`, 0.1`, 0.22`, 0.24`, 0.04`, 
          0.28`, 0.1`, 0.23`, 0.03`, 0.34`, 0.21`, 0.41`, 0.15`, 0.05`, 
          0.17`, 0.53`, 0.3`, 0.15`, 0.19`, 0.07`, 0.83`, 0.04`, 0.04`, 
          0.14`, 0.34`, 0.1`, 0.15`, 0.05`, 0.04`, 0.05`, 0.65`, 0.16`, 
          0.32`, 0.87`, 0.07`, 0.17`, 0.1`, 0.03`, 0.17`, 0.38`, 0.28`, 
          0.14`, 0.07`, 0.14`, 0.03`, 0.21`, 0.4`, 0.04`, 0.11`, 0.44`, 0.9`, 
          0.1`, 0.49`, 0.09`, 0.01`, 0.08`, 0.06`, 0.08`, 0.01`, 0.15`, 0.5`, 
          0.36`, 0.08`, 0.34`, 0.02`, 0.21`, 0.32`, 0.22`, 0.51`, 0.12`, 
          0.16`, 0.52`, 0.21`, 0.05`, 0.46`, 0.44`, 0.04`, 0.05`, 0.04`, 
          0.14`, 0.08`, 0.21`, 0.02`, 0.63`, 0.35`, 0.01`, 0.38`, 0.43`, 
          0.03`, 0.39`, 0.04`, 0.17`, 0.23`, 0.78`, 0.14`, 0.08`, 0.11`, 
          0.07`, 0.45`, 0.46`, 0.2`, 0.19`, 0.5`, 0.09`, 0.22`, 0.29`, 0.01`, 
          0.19`, 0.06`, 0.39`, 0.08`, 0.03`, 0.28`, 0.09`, 0.17`, 0.45`, 
          0.4`, 0.07`, 0.3`, 0.16`, 0.24`, 0.81`, 1.35`, 0.01`, 0.02`, 0.03`, 
          0.06`, 0.12`, 0.31`, 0.64`, 0.08`, 0.15`, 0.06`, 0.06`, 0.15`, 
          0.68`, 0.3`, 0.02`, 0.04`, 0.02`, 0.81`, 0.09`, 0.19`, 0.14`, 
          0.12`, 0.36`, 0.02`, 0.11`, 0.04`, 0.08`, 0.17`, 0.04`, 0.05`, 
          0.14`, 0.07`, 0.39`, 0.13`, 0.56`, 0.12`, 0.31`, 0.05`, 0.1`, 
          0.13`, 0.05`, 0.01`, 0.09`, 0.03`, 0.27`, 0.17`, 0.03`, 0.05`, 
          0.26`, 0.23`, 0.2`, 0.76`, 0.05`, 0.02`, 0.01`, 0.2`, 0.21`, 0.02`, 
          0.04`, 0.16`, 0.32`, 0.43`, 0.2`, 0.13`, 0.1`, 0.2`, 0.08`, 0.81`, 
          0.11`, 0.09`, 0.26`, 0.15`, 0.36`, 0.18`, 0.1`, 0.34`, 0.56`, 
          0.09`, 0.15`, 0.14`, 0.15`, 0.22`, 0.33`, 0.04`, 0.07`, 0.09`, 
          0.18`, 0.08`, 0.07`, 0.07`, 0.68`, 0.27`, 0.21`, 0.11`, 0.07`, 
          0.44`, 0.13`, 0.04`, 0.39`, 0.14`, 0.1`, 0.08`, 0.02`, 0.57`, 
          0.35`, 0.17`, 0.21`, 0.14`, 0.77`, 0.06`, 0.34`, 0.15`, 0.29`, 
          0.08`, 0.72`, 0.31`, 0.2`, 0.1`, 0.01`, 0.24`, 0.07`, 0.22`, 0.49`, 
          0.03`, 0.18`, 0.47`, 0.37`, 0.17`, 0.42`, 0.02`, 0.22`, 0.12`, 
          0.01`, 0.34`, 0.41`, 0.27`, 0.07`, 0.3`, 0.09`, 0.27`, 0.28`, 
          0.15`, 0.26`, 0.01`, 0.06`, 0.35`, 0.03`, 0.26`, 0.05`, 0.18`, 
          0.46`, 0.12`, 0.23`, 0.32`, 0.08`, 0.26`, 0.82`, 0.1`, 0.69`, 
          0.15`, 0.01`, 0.39`, 0.04`, 0.13`, 0.34`, 0.13`, 0.13`, 0.3`, 
          0.29`, 0.23`, 0.01`, 0.38`, 0.04`, 0.08`, 0.15`, 0.1`, 0.62`, 
          0.83`, 0.11`, 0.71`, 0.08`, 0.61`, 0.18`, 0.05`, 0.2`, 0.12`, 0.1`, 
          0.03`, 0.11`, 0.2`, 0.16`, 0.1`, 0.03`, 0.23`, 0.12`, 0.01`, 0.12`, 
          0.17`, 0.14`, 0.1`, 0.02`, 0.13`, 0.06`, 0.21`, 0.5`, 0.04`, 0.42`, 
          0.29`, 0.08`, 0.01`, 0.3`, 0.45`, 0.06`, 0.25`, 0.02`, 0.06`, 
          0.02`, 0.17`, 0.1`, 0.28`, 0.21`, 0.28`, 0.3`, 0.02`, 0.02`, 0.28`, 
          0.09`, 0.71`, 0.06`, 0.12`, 0.29`, 0.05`, 0.27`, 0.25`, 0.1`, 
          0.16`, 0.08`, 0.52`, 0.44`, 0.19`, 0.72`, 0.12`, 0.3`, 0.14`, 
          0.45`, 0.42`, 0.09`, 0.07`, 0.62`, 0.51`, 0.5`, 0.47`, 0.28`, 
          0.04`, 0.66`, 0.08`, 0.11`, 0.03`, 0.32`, 0.16`, 0.11`, 0.26`, 
          0.05`, 0.07`, 0.04`, 0.22`, 0.08`, 0.08`, 0.01`, 0.06`, 0.05`, 
          0.05`, 0.16`, 0.05`, 0.13`, 0.42`, 0.21`, 0.36`, 0.05`, 0.01`, 
          0.44`, 0.14`, 0.14`, 0.14`, 0.08`, 0.51`, 0.18`, 0.02`, 0.51`, 
          0.06`, 0.22`, 0.01`, 0.09`, 0.22`, 0.59`, 0.03`, 0.71`, 0.14`, 
          0.02`, 0.51`, 0.03`, 0.41`, 0.17`, 0.37`, 0.39`, 0.82`, 0.81`, 
          0.24`, 0.52`, 0.4`, 0.24`, 0.06`, 0.73`, 0.27`, 0.18`, 0.01`, 
          0.17`, 0.02`, 0.11`, 0.26`, 0.13`, 0.68`, 0.13`, 0.08`, 0.71`, 
          0.04`, 0.11`, 0.13`, 0.17`, 0.34`, 0.23`, 0.08`, 0.26`, 0.03`, 
          0.21`, 0.45`, 0.4`, 0.03`, 0.16`, 0.06`, 0.29`, 0.43`, 0.03`, 0.1`, 
          0.1`, 0.31`, 0.27`, 0.27`, 0.33`, 0.14`, 0.09`, 0.27`, 0.14`, 
          0.09`, 0.08`, 0.06`, 0.16`, 0.02`, 0.07`, 0.19`, 0.11`, 0.1`, 
          0.17`, 0.24`, 0.01`, 0.13`, 0.21`, 0.03`, 0.39`, 0.01`, 0.27`, 
          0.19`, 0.02`, 0.21`, 0.04`, 0.1`, 0.06`, 0.48`, 0.12`, 0.15`, 
          0.12`, 0.52`, 0.48`, 0.29`, 0.57`, 0.22`, 0.01`, 0.44`, 0.05`, 
          0.49`, 0.1`, 0.19`, 0.44`, 0.02`, 0.72`, 0.09`, 0.04`, 0.02`, 
          0.02`, 0.06`, 0.22`, 0.53`, 0.18`, 0.1`, 0.1`, 0.03`, 0.08`, 0.15`, 
          0.05`, 0.13`, 0.02`, 0.1`, 
          0.51`};

m1 = Mean[Dat]
sig = Sqrt[Variance[Dat]]
g1 = Skewness[Dat]
g2 = Kurtosis[Dat]
n  =  Length[Dat]
psi[x_, m1_, sig_, g1_] = ((x - m1)/sig)^3  - 
        g1  -  (3*g1/2)*(((x - m1)/sig)^2  - 1)  - 
        3*(x - m1)/sig
psiW[x_, m1_, sig_, g1_] = ((x - m1)/sig)^3  - 
        g1  -  (3*g1/2)*(((x - m1)/sig)^2  - 
              1) 

Infl = 
      Table[psi[Dat[[j]], m1, sig, g1], {j, 1, 
          Length[Dat]}]
InflW = 
      Table[psiW[Dat[[j]], m1, sig, g1], {j, 1, 
          Length[Dat]}]
Mean[Infl]
Mean[InflW]
V2 = Variance[Infl]
V2W = Variance[InflW]
SEhat  =  Sqrt[V2/n]
SEhatW  =  Sqrt[V2W/n]