CIDMS
Computes a confidence interval on a variance component estimated as proportional to the difference in two mean squares in a balanced complete experimental design.
Required Arguments
DF1 — Degrees of freedom for effect 1. (Input)
EFMS1 — Mean square for effect 1. (Input)
DF2 — Degrees of freedom for effect 2. (Input)
EFMS2 — Mean square for effect 2. (Input)
VCHAT — Estimated variance component. (Input)
VCHAT = (EFMS1 EFMS2)/a, where a is some positive constant.
CONINT — Vector of length 2 containing the lower and upper endpoints of the confidence interval, respectively. (Output)
Optional Arguments
CONPER — Confidence level for two-sided interval estimate on the variance component, in percent. (Input)
Default: CONPER = 95.0.
A CONPER percent interval is computed, hence, CONPER must be in the interval [0.0, 100.0). CONPER often will be 90.0, 95.0, or 99.0. For a one-sided interval with confidence level ONECL, ONECL in the interval [50.0, 100.0), set
CONPER = 100.0 2.0 * (100.0 ONECL).
IMETH — Method option. (Input)
Default: IMETH = 0.
IOPT
Action
0
Graybill’s Method
1
Bross’ Method
FORTRAN 90 Interface
Generic: CALL CIDMS (DF1, EFMS1, DF2, EFMS2, VCHAT, CONINT [])
Specific: The specific interface names are S_CIDMS and D_CIDMS.
FORTRAN 77 Interface
Single: CALL CIDMS (DF1, EFMS1, DF2, EFMS2, VCHAT, CONPER, IMETH, CONINT)
Double: The double precision name is DCIDMS.
Description
Routine CIDMS computes a confidence interval on a variance component that has been estimated as proportional to the difference of two mean squares. Let
(stored in EFMS1 and EFMS2, respectively) be the two mean squares. The variance component estimate
(stored in VCHAT) is assumed to be of the form
where a is some positive constant. Two methods for computing a confidence interval on σ2 can be used. For IMETH = 0, the method discussed by Graybill (1976, Theorem 15.3.5, page 624, and Note 4, page 620) is used. The result was proposed by Williams (1962). For IMETH = 1, the method due to Bross (1950) and discussed by Anderson and Bancroft (1952, page 322) is used.
Routine CIDMS can also be used when a variance component is estimated by the difference of two linear combinations of mean squares, each linear combination contains nonnegative coefficients, and the two linear combinations do not use any of the same mean squares. Let
be the two linear combinations (stored in EFMS1 and EFMS2, respectively). The variance component estimate
(stored in VCHAT) is assumed to be of the form
where a is some positive constant, the ci’s and di’s are nonnegative, and for i = 1, 2, , k, cidi = 0. Satterthwaite (1946) approximations as discussed by Graybill (1976, pages 642 643) can be used to arrive at approximate degrees of freedom for each linear combination of mean squares for input into CIDMS. Let νi be the degrees of freedom associated with the i-th mean square
The degrees of freedom stored in DF1 and DF2 should be taken to be
and
respectively.
Comments
Informational error
Type
Code
Description
1
1
One or more endpoints of CI are set to zero.
Example
This example computes a confidence interval on a variance component estimated by a difference of mean squares using a nested design discussed by Graybill (1976, pages 635636). The nested design gave the following analysis of variance table:
Source
DF
MS
EMS
A
5
385.4
B within A
18
85.4
Error
48
12.3
A confidence interval of
is computed using the method of Graybill. (Note that the lower endpoint of the confidence interval, which is 3.136, is given incorrectly by Graybill [page 636]. Graybill uses an incorrect value for F0.975;5, 18 in his computations.)
 
USE CIDMS_INT
USE UMACH_INT
 
IMPLICIT NONE
INTEGER NOUT
REAL CONINT(2), DF1, DF2, EFMS1, EFMS2, VCHAT
!
DF1 = 5.0
EFMS1 = 385.4
DF2 = 18.0
EFMS2 = 85.4
VCHAT = (EFMS1-EFMS2)/12.0
!
CALL CIDMS (DF1, EFMS1, DF2, EFMS2, VCHAT, CONINT)
!
CALL UMACH (2, NOUT)
WRITE (NOUT,99999) CONINT
99999 FORMAT (' Lower confidence limit', F9.3, /' Upper confidence ', &
'limit', F9.3)
END
Output
 
Lower confidence limit 3.136
Upper confidence limit 186.464
Published date: 03/19/2020
Last modified date: 03/19/2020