Browse code

changed signature for snpCall<- and snpCallProbability<-

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

Rob Scharp authored on 16/02/2011 15:57:46
Showing1 changed files

... ...
@@ -569,11 +569,22 @@ setMethod("totalCopynumber", signature=signature(object="CNSet"),
569 569
 		  return(ca+cb)
570 570
 	  })
571 571
 
572
-setReplaceMethod("snpCall", c("CNSet", "ff_or_matrix"),
573
-                 function(object, ..., value){
572
+##setReplaceMethod("snpCall", c("CNSet", "ff_or_matrix"),
573
+##                 function(object, ..., value){
574
+##			 assayDataElementReplace(object, "call", value)
575
+##		 })
576
+
577
+setReplaceMethod("snpCall", "CNSet",
578
+                 function(object, value){
574 579
 			 assayDataElementReplace(object, "call", value)
575 580
 		 })
576
-setReplaceMethod("snpCallProbability", c("CNSet", "ff_or_matrix"),
577
-                 function(object, ..., value){
581
+
582
+##setReplaceMethod("snpCallProbability", c("CNSet", "ff_or_matrix"),
583
+##                 function(object, ..., value){
584
+##			 assayDataElementReplace(object, "callProbability", value)
585
+##		 })
586
+
587
+setReplaceMethod("snpCallProbability", "CNSet",
588
+                 function(object, value){
578 589
 			 assayDataElementReplace(object, "callProbability", value)
579 590
 		 })