MainComputersProgrammingLanguages › Robust Estimation of Simple Statistics

Robust Estimation of Simple Statistics

Edit Page
Report
Scan day: 03 March 2014 UTC
-71
Virus safety - good
Description: By T. Beers, K. Flynn, and K. Gebhardt.
PROGRAM ROSTAT c***************************************************************************** c c VERSION 1.2 February.1991 c c--- this routine contains the current versions of statistical c routines being tested by T. Beers, K. Flynn, and K. Gebhardt for robust c estimation of simple statistics c c***************************************************************************** c c-- CHANGES SINCE V1.0 (see update document for more information) c c-- 10/10/90 -- include the original estimate of the biweight when c error corrections are desired c c-- 10/10/90 -- change dip test so it doesn't loop forever c c-- 10/10/90 -- add check so KSREJ does not clip to N=5 c c-- 10/11/90 -- changed calculation of acceleration constant c c-- 1/ 1/91 -- changed b1 & b2 test and added probability calculation c c-- CHANGES SINCE V1.1 (see update document for more information) c c-- 1/28/91 -- included the term of 1/1.349 in the calculation of the c confidence interval for the median and fourth spread c c-- 1/28/91 -- the calculation for the confidence interval for the 3-sigma c mean and stand. dev. was changed in confidence and PRINTER c was updated c c-- 1/28/91 -- PRINTER was changed so it now writes out the proper T-VALUES c which are calculated in the program c c-- 1/28/91 -- Changed calculation of B1-test so it gives the left side c probability when the skewness is less than 0 c c-- 1/30/91 -- Fixed default number of decimal places for output c c-- 1/31/91 -- Added check so that SIGMA does not clip to N = 5 c c-- 2/ 1/91 -- Added check so that KURTSKEW is skipped when N = 5 c-- If isin is set equal to 1 then the canonical confidence interval c used will be calculated using the 3-sigma mean and standard c deviation. If isin = 0, the mean and standard deviation will be used . isin=1 if (isin.eq.0) then nsin=n xsin=xsdev else if (isin.eq.1) then nsin=nstot xsin=xssdev endif 769 CALL CONFIDENCE (N,NSIN,XSIN,XDFS,XSBIWT,XSJACK2, + XLSJACK2,XSJACK6,XLSJACK6,XSJACK7,XLSJACK7, + XMSC,XMDC,XTSC,XJKC,XJLC,XJBC,XJBLC, + XJGC,
Size: 2048 chars

Contact Information

Email:
Phone&Fax: 69314718056
Address:
Extended:

WEBSITE Info

Page title:
Keywords:
Description:
IP-address:35.9.68.172

WHOIS Info

NS
Name Servers: SERV1.CL.MSU.EDU 35.8.2.41 SERV3.CL.MSU.EDU 35.8.98.43
WHOIS
Date
activated: 06-May-1987
last updated: 25-May-2012
expires: 31-Jul-2014