Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Path: utzoo!linus!philabs!cmcl2!floyd!harpo!seismo!presby!aron From: aron@presby.UUCP Newsgroups: net.sources,net.usoft.s Subject: bug fixes for S routines Message-ID: <224@presby.UUCP> Date: Mon, 20-Jun-83 13:01:19 EDT Article-I.D.: presby.224 Posted: Mon Jun 20 13:01:19 1983 Date-Received: Tue, 21-Jun-83 16:30:39 EDT Lines: 22 A while ago I posted some routines and macros to use with S. Here are some bug fixes: (1) In the file pairedt.i: after the line DO k = 1, NROW(mat) { replace the next line with mdiff[k] = mat[k,i] - mat[k,j] (2) In the file ptcalc.r: after the line adf = nr-1 replace the next line with apt = 2* (1-ptdis(abs(at),adf)) (3) In the file avcalc.r: after the line # compute F statistic probability replace the next two lines with rpf = 1-pfdis(abs(rf),rdf,edf) cpf = 1-pfdis(abs(cf),cdf,edf) aron shtull-trauring {seismo,cmcl2}!presby!aron