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

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

Author: yurii
Date: 2011-03-08 00:41:59 +0100 (Tue, 08 Mar 2011)
New Revision: 689

Modified:
   pkg/GenABEL/R/polygenic_hglm.R
Log:
deleted a couple of unused lines

Modified: pkg/GenABEL/R/polygenic_hglm.R
===================================================================
--- pkg/GenABEL/R/polygenic_hglm.R	2011-03-07 23:26:01 UTC (rev 688)
+++ pkg/GenABEL/R/polygenic_hglm.R	2011-03-07 23:41:59 UTC (rev 689)
@@ -75,8 +75,6 @@
 	relmat <- relmat*2.0
 	s <- svd(relmat)
 	L <- s$u %*% diag(sqrt(s$d))
-	cnv <- 1e-6
-	mxit <- 40
 	res_hglm <- hglm(y = y, X = desmat, Z = L, family = family, conv = conv, maxit = maxit, ... )
 	#sum_res_hglm <- summary(res_hglm)