Current issue

Vol.26 No.4

Vol.26 No.4

Volumes

© 1984-2017
British APL Association
All rights reserved.

Archive articles posted online on request: ask the archivist.

archive/11/2

Volume 11, No.2

Understanding Statistical Theory through Simulation
David Appleton

The central limit theorem is of tremendous importance to statistical theory. Do students really understand it? How can we help them to? We present here a small revision project which makes students use simulation, most easily in APL, to investigate how addition of variates from the same distribution usually leads to a more nearly Normal distribution. The project is not suitable as an initial approach to the central limit theorem as it brings in too many other statistical ideas, though the simulation programs could be used by a lecturer to produce an informal graphical introduction to the theory. Many teachers probably already do just that; this is for the others. Theoretical results are summarised, not because they are unfamiliar but so that readers may the more quickly assess how much knowledge students must have to complete the project.

The Central Limit Theorem

The central limit theorem states that if figure 2 0 where ξi are identically and independently distributed with mean figure 4 0and variance figure 6 0 then

figure 8 0

where figure 10 0 is the cumulative distribution function of the standard Normal distribution.

The Project

  1. For each of the following five values of α, generate 10 random samples, each of size 1000, where observations are independently distributed as the sum of a standard exponential variates. (α = 1, 2, 5, 10 and 20). Calculate the skewness and kurtosis of each sample, and plot them (separately) against a suitable power of α. Plot the theoretical values of the skewness and kurtosis for all α≥1, remembering what distribution is formed by the sum of independent exponential variates with the same mean.
  2. Repeat the exercise using rectangular variates. Superimpose the results on the graphs for the exponential distribution, adding again the theoretical values for all α. (You may find it easiest to use the rectangular distribution on [-1,1] for the theoretical part of this question, and to obtain the moments using Maple.)
  3. Now generate 50 samples of 1000 and 50 samples of 100 variates which are the sum of 20 rectangular variates. Compare the standard deviations of your two sets of 50 estimates of skewness with the theoretical standard error of the estimate of skewness from a Normal sample. Do the same for kurtosis.
  4. Repeat part (a) using Cauchy variates.
  5. Discuss all of your results with reference to the central limit theorem.

APL Functions

These are all very easy — indeed trivial — though to execute them you need to be able to use quite large workspaces. Since we are measuring tendency to Normality by skewness and kurtosis we need functions to evaluate these. Let us assume that the replicate samples are contained in the rows of a matrix: one possible function is:

   ∇Z←SKKUR X;N
[1] X←X-⍉(⌽⍴X)⍴(+/X)÷N←¯1↑⍴X
[2] X←X÷⍉(⌽⍴X)⍴((+/X×X)÷N)*0.5
[3] Z←((+/X*3),[1.5](+/X*4))÷N
   ∇

We need to be able to generate rectangular, exponential and Cauchy variates:

   ∇Z←RECT N
[1] Z←(N⍴2147483647)÷2147483648
   ∇

   ∇Z←EXPN N
[1] Z←-RECT N
   ∇

   ∇Z←CAUCHY N
[1] Z←3○○¯0.5+RECT N
   ∇

The last two of these programs use the inverse of the appropriate distribution functions, which we give here for completeness. For the exponential distribution with unit mean figure 12 0, and for the Cauchy distribution figure 14 0.

Finally we need to be able to add the random variates to form the matrices for evaluation of skewness and kurtosis:

   ∇Z←REPSNalpha SUM distn
[1] Z←+/⍎distn,' ',⍕REPSNalpha
   ∇

where the left-hand parameter contains the number of replicates (10 in most of the project), the sample size (1000 or 100 in the project) and the number of variates to be added (the 5 values of a). The right-hand parameter is the name of one of the functions which generate the random variates. The calculations for part (c) may therefore be performed by calling

      SKKUR 50 100 20 SUM 'RECT'
      SKKUR 50 1000 20 SUM 'RECT'

Theoretical results

The sum of a independent unit exponential variates is an Erlangian (or gamma) variate with distribution function figure 16 0 and characteristic function figure 18 0. Since the distribution is asymmetric, it is necessary for students to be able to calculate the central moments using the formulae figure 20 0 ; figure 22 0 ; figure 24 0. The variance, skewness (figure 26 0) and kurtosis (figure 28 0) can be shown to be a, figure 30 0, and figure 32 0 respectively. All these formulae may conveniently be found in Kotz and Johnson.¹

The characteristic function of the rectangular distribution on the interval figure 34 0 is figure 36 0. As suggested in the project, therefore, it is easiest to work with a=0, b=1, so that the characteristic function for the sum of α such rectangular variates is figure 38 0. Maple² gives the Taylor expansion of this function as figure 40 0 which can be manipulated into the form figure 42 0 . From this we can see not only that the variance is figure 44 0, which is obviously true since the variance of the rectangular distribution on figure 46 0 is figure 48 0, but also that the kurtosis is figure 50 0 or figure 52 0. The skewness is of course zero. The Maple command which gives this result is

taylor( ((sin(x)/x)^alpha), x= 0, 6 ); .

though in fact working with m = 1/α makes the algebra easier.

For large samples of size n the variance of the skewness of a Normal distribution is approximately 6/n, and that of the kurtosis 24/n.

Simulation Results

Figure 1 shows graphs of a set of simulations for the rectangular and exponential distributions. The student has to choose what power of α to plot the skewness and kurtosis against. Since the rectangular distribution is symmetrical it does not matter what power is chosen for skewness, but for the exponential distribution α-1/2 is best as it shows the relationship as a straight line. For either distribution α-1 is best for kurtosis for the same reason.

Figure 2 gives the same information for the Cauchy distribution. Note the considerable change of scale.

figure 54 0figure 56 0

Figure 1. (a) skewness and (b) kurtosis of the sum of exponential (•) or rectangular (o) variates. Each point represents a sample of 1000 variates which are formed as the sum of α such variates, for α = 1, 2, 5, 10 or 20. The theoretical results are superimposed.

figure 58 0figure 60 0

Figure 2. (a) skewness and (b) kurtosis of the sum of Cauchy variates. Each point represents a sample of 1000 variates which are formed as the sum of α Cauchy variates, for α = 1, 2, 5, 10 or 20.

What are students to make of such results? They ought to be struck by the closeness of the simulations to the theoretical results, and by the small amount of variability when rectangular variates are involved as compared to exponential variates. The greater variability when fewer variates are summed should also be clear. It should be obvious to them that the Cauchy results are totally different from those of the other two distributions. That the skewness tends to zero and the kurtosis to the value 3 as α gets large (though it does not need to be very large for the values to be close) should be clear evidence that the distributions are tending rapidly to Normality.

For the particular simulations carried out here for the sum of rectangular variates, when α = 20, we have results as in Table I.

Sample size

100

1000

 

Mean

 

Standard deviation

Theoretical standard error

 

Mean

 

Standard deviation

Theoretical standard error

Skewness

-0.032

0.230

0.245

0.001

0.073

0.077

Kurtosis

2.87

0.42

0.49

2.93

0.13

0.15

Table I. Values of skewness and kurtosis of samples of size 100 and 1000 of the sum of 20 rectangular variates; means and standard deviations are given for 50 samples of each size. Theoretical values are also given for the standard errors of estimates of skewness from samples of size 100 and 1000 from a Normal distribution.

Students should not only see that the simulations give values for skewness and kurtosis which agree well with theoretical values; they should also note that the standard deviations of their sample values for both skewness and kurtosis agree well with the theoretical values of the standard errors of the estimates.

The best students might look more closely at the individual results, rather than merely summarise them in this way. They might notice that for the smaller sample size the distribution of values of kurtosis is somewhat skew.

Discussion

The central limit theorem is the basis for much of the methodology of applied statistics. If it did not hold, the pre-eminence of methods based on the Normal distribution would not exist; for example the calculation of confidence intervals for sample means would not take place as it does, nor would the method of least squares be so important. It is necessary that students of statistics understand it, not merely as a statement but also in terms of its consequences.

What we have tried to do here is present a short project which puts the theorem in perspective. It also tries to tie together various other aspects of a statistics course. Most students will find the moments of the gamma distribution either by looking them up in a reference book or by remembering that they can integrate figure 62 0.

The slightly unusual choice of notation (using α instead of k perhaps) was meant to guide them gently to this integral. For the rectangular distribution they have been pointed towards the characteristic function, and unless they are very adept at handling series they will almost certainly require to demonstrate some ability with a computer-algebra package. To examine the sampling variance of skewness and kurtosis they will have to perform some straightforward descriptive statistics, and they must also show that they can produce simple computer graphics; here we have used the Fig.P package³. And of course they must be able to write the short programs necessary to generate the random variates from the appropriate distributions and calculate the skewness and kurtosis. No single part of the project is difficult, but it tests a variety of important statistical and mathematical skills.

The use of the sum of variates from an asymmetric distribution such as the exponential is quite important, as the approach to Normality is more impressive than from a symmetric distribution, but of course other distributions may be used. The fact that the distribution of the sum of variates from the logistic distribution approaches a value of 3 for kurtosis no faster than those from a rectangular distribution might be of some interest. Maple will show this quite easily:

readlib(coeftayl);
f:=(Pi*I*x/sin(Pi*I*x))^(1/m);
c2:=-2*coeftayl(f,x=0,2);
c4:=24*coeftayl(f,x=0,4);
simplify(c4/c2^2);

Any project involving random numbers is by its nature unpredictable. The teacher cannot know exactly what data will be produced unless he specifies the programs for random number generation and insists on the seed to be used. The first of these actions takes away a good deal of the learning process the project is designed to engender, and the second will justly be viewed as extremely suspicious. It is therefore important that simulation projects should not rely on small experiments where strange outcomes are more likely to occur. However, even when large numbers are involved it is important to make sure that results are not over-interpreted; in the graphs related to the Cauchy distribution, for example, there is the suspicion that the kurtosis may be slightly less varied for larger values of α.

If a poor student suggests this, it may indicate that he is not fully aware of the ramifications of the Cauchy distribution, though a good student may wonder if it could be something to do with standardising by a variance which exists only for a sample. The results for the other distributions are more important than such points; the reason for introducing the Cauchy distribution into the project is to show that the conditions under which the central limit theorem can be proved really matter: the mean and standard deviation must exist. This is sometimes regarded by students as rather frivolous, but the vast difference in the results between the two ’proper’ distributions and the Cauchy distribution should make the point clearly.

There are, of course, many places in statistical education where simulation can aid understanding, and APL is a most convenient language in which to perform such exercises. It is to be hoped that use of the language will continue to help students to understand more fully these essential concepts.

References

  1. Kotz S & Johnson NL (1988). Encyclopedia of Statistical Sciences. Wiley, New York.
  2. Waterloo Maple Software (1993). Maple V. University of Waterloo, Canada.
  3. Fig.P Software Corporation (1992). Fig.P (version 6.0). Biosoft, Cambridge, UK.


script began 13:44:27
caching off
debug mode off
cache time 3600 sec
indmtime not found in cache
cached index is fresh
recompiling index.xml
index compiled in 0.2621 secs
read index
read issues/index.xml
identified 26 volumes, 101 issues
array (
  'id' => '10000340',
)
regenerated static HTML
article source is 'HTML'
source file encoding is 'UTF-8'
URL: appleton4_files/image002.gif => trad/v112/appleton4_files/image002.gif
URL: appleton4_files/image004.gif => trad/v112/appleton4_files/image004.gif
URL: appleton4_files/image006.gif => trad/v112/appleton4_files/image006.gif
URL: appleton4_files/image008.gif => trad/v112/appleton4_files/image008.gif
URL: appleton4_files/image010.gif => trad/v112/appleton4_files/image010.gif
URL: appleton4_files/image012.gif => trad/v112/appleton4_files/image012.gif
URL: appleton4_files/image014.gif => trad/v112/appleton4_files/image014.gif
URL: appleton4_files/image016.gif => trad/v112/appleton4_files/image016.gif
URL: appleton4_files/image018.gif => trad/v112/appleton4_files/image018.gif
URL: appleton4_files/image020.gif => trad/v112/appleton4_files/image020.gif
URL: appleton4_files/image022.gif => trad/v112/appleton4_files/image022.gif
URL: appleton4_files/image024.gif => trad/v112/appleton4_files/image024.gif
URL: appleton4_files/image026.gif => trad/v112/appleton4_files/image026.gif
URL: appleton4_files/image028.gif => trad/v112/appleton4_files/image028.gif
URL: appleton4_files/image030.gif => trad/v112/appleton4_files/image030.gif
URL: appleton4_files/image032.gif => trad/v112/appleton4_files/image032.gif
URL: appleton4_files/image034.gif => trad/v112/appleton4_files/image034.gif
URL: appleton4_files/image036.gif => trad/v112/appleton4_files/image036.gif
URL: appleton4_files/image038.gif => trad/v112/appleton4_files/image038.gif
URL: appleton4_files/image040.gif => trad/v112/appleton4_files/image040.gif
URL: appleton4_files/image042.gif => trad/v112/appleton4_files/image042.gif
URL: appleton4_files/image044.gif => trad/v112/appleton4_files/image044.gif
URL: appleton4_files/image046.gif => trad/v112/appleton4_files/image046.gif
URL: appleton4_files/image048.gif => trad/v112/appleton4_files/image048.gif
URL: appleton4_files/image050.gif => trad/v112/appleton4_files/image050.gif
URL: appleton4_files/image052.gif => trad/v112/appleton4_files/image052.gif
URL: appleton4_files/image054.gif => trad/v112/appleton4_files/image054.gif
URL: appleton4_files/image056.gif => trad/v112/appleton4_files/image056.gif
URL: appleton4_files/image058.gif => trad/v112/appleton4_files/image058.gif
URL: appleton4_files/image060.gif => trad/v112/appleton4_files/image060.gif
URL: appleton4_files/image062.gif => trad/v112/appleton4_files/image062.gif
completed in 0.2896 secs