git-svn-id: file:///home/git/hedgehog.fhcrc.org/bioconductor/trunk/madman/Rpacks/crlmm@48939 bc3139a8-67e5-0310-9ffc-ced21a209358
... | ... |
@@ -16,8 +16,8 @@ setGeneric("phi", function(object, allele) standardGeneric("phi")) |
16 | 16 |
setGeneric("sigma2", function(object, allele) standardGeneric("sigma2")) |
17 | 17 |
setGeneric("tau2", function(object, allele) standardGeneric("tau2")) |
18 | 18 |
|
19 |
-setGeneric("CA", function(object) standardGeneric("CA")) |
|
20 |
-setGeneric("CB", function(object) standardGeneric("CB")) |
|
19 |
+setGeneric("CA", function(object, i, j, ...) standardGeneric("CA")) |
|
20 |
+setGeneric("CB", function(object, i, j, ...) standardGeneric("CB")) |
|
21 | 21 |
setGeneric("totalCopyNumber", function(object, i, j, ...) standardGeneric("totalCopyNumber")) |
22 | 22 |
|
23 | 23 |
|
... | ... |
@@ -237,14 +237,17 @@ setMethod("corr", c("CNSetLM", "character"), function(object, allele){ |
237 | 237 |
return(res) |
238 | 238 |
}) |
239 | 239 |
|
240 |
-setMethod("CB", "CNSet", function(object){ |
|
241 |
- ##assayDataElement(object, "CB") |
|
242 |
- browser() |
|
243 |
-}) |
|
244 |
-setMethod("CA", "CNSet", function(object) { |
|
245 |
- browser() |
|
246 |
- ##assayDataElement(object, "CA") |
|
247 |
-}) |
|
240 |
+setMethod("CB", |
|
241 |
+ signature=signature(object="CNSet", i="integerOrMissing", j="integerOrMissing"), |
|
242 |
+ function(object, i, j){ |
|
243 |
+ ##assayDataElement(object, "CB") |
|
244 |
+ browser() |
|
245 |
+ }) |
|
246 |
+setMethod("CA", |
|
247 |
+ signature=signature(object="CNSet", i="integerOrMissing", j="integerOrMissing"), |
|
248 |
+ function(object, i, j) { |
|
249 |
+ browser() |
|
250 |
+ }) |
|
248 | 251 |
|
249 | 252 |
setMethod("totalCopyNumber", |
250 | 253 |
signature=signature(object="CNSet", i="integerOrMissing", j="integerOrMissing"), |