Browse code

Added methods for flags and flags<-. Added 'flags' as an element to the LinearModelParameter object

git-svn-id: file:///home/git/hedgehog.fhcrc.org/bioconductor/trunk/madman/Rpacks/crlmm@48957 bc3139a8-67e5-0310-9ffc-ced21a209358

Rob Scharp authored on 21/08/2010 02:49:41
Showing2 changed files

... ...
@@ -29,7 +29,7 @@ importClassesFrom(oligoClasses, SnpSuperSet, AlleleSet, CNSet)
29 29
 importMethodsFrom(oligoClasses, allele, calls, "calls<-", confs,
30 30
 		  "confs<-", cnConfidence, "cnConfidence<-", isSnp,
31 31
 		  chromosome, position, A, B,
32
-		  "A<-", "B<-", open, close, lM, "lM<-")
32
+		  "A<-", "B<-", open, close, lM, "lM<-", flags, "flags<-")
33 33
 
34 34
 importFrom(oligoClasses, chromosome2integer, celfileDate, list.celfiles,
35 35
            copyNumber, initializeBigMatrix, initializeBigVector)
... ...
@@ -761,7 +761,7 @@ crlmmCopynumberLD <- function(object,
761 761
 		 neededPkgs="crlmm")
762 762
 	return(object)
763 763
 }
764
-yycrlmmCopynumber2 <- crlmmCopynumberLD
764
+crlmmCopynumber2 <- crlmmCopynumberLD
765 765
 
766 766
 fit.lm1 <- function(idxBatch,
767 767
 		    snpBatches,