[Genabel-commits] r724 - pkg/GenABEL/R

[noreply at r-forge.r-project.org]

Author: lckarssen
Date: 2011-05-18 10:47:16 +0200 (Wed, 18 May 2011)
New Revision: 724

Modified:
   pkg/GenABEL/R/descriptives.marker.R
Log:
Fixed typo in GenABEL's descriptives.marker

Modified: pkg/GenABEL/R/descriptives.marker.R
===================================================================
--- pkg/GenABEL/R/descriptives.marker.R	2011-05-18 08:04:07 UTC (rev 723)
+++ pkg/GenABEL/R/descriptives.marker.R	2011-05-18 08:47:16 UTC (rev 724)
@@ -31,8 +31,8 @@
 	rm(s);gc(verbose=FALSE)
 	out[["Minor allele frequency distribution"]] <- catable(maf,cat=mafc,digits=digits)
 	out[["Cumulative distr. of number of SNPs out of HWE, at different alpha"]] <- catable(hwe,cat=hwec,cumulative=TRUE,digits=digits)
-	out[["Distribution of porportion of successful genotypes (per person)"]] <- catable(ill,cat=idcc,digits=digits)
-	out[["Distribution of porportion of successful genotypes (per SNP)"]] <- catable(cll,cat=snpc,digits=digits)
+	out[["Distribution of proportion of successful genotypes (per person)"]] <- catable(ill,cat=idcc,digits=digits)
+	out[["Distribution of proportion of successful genotypes (per SNP)"]] <- catable(cll,cat=snpc,digits=digits)
 	out[["Mean heterozygosity for a SNP"]] <- smh
 	out[["Standard deviation of the mean heterozygosity for a SNP"]] <- ssdh
 	out[["Mean heterozygosity for a person"]] <- mhet