git-svn-id: file:///home/git/hedgehog.fhcrc.org/bioconductor/trunk/madman/Rpacks/bsseq@78860 bc3139a8-67e5-0310-9ffc-ced21a209358
Kasper D. Hansen authored on 25/07/2013 17:46:56 | ... | ... |
@@ -43,7 +43,7 @@ setReplaceMethod("pData",
|
| 43 | 43 |
object = "BSseq", |
| 44 | 44 |
value = "data.frame"), |
| 45 | 45 |
function(object, value) {
|
| 46 |
- object@colData <- as(value, "DataFrame") |
|
| 46 |
+ colData(object) <- as(value, "DataFrame") |
|
| 47 | 47 |
object |
| 48 | 48 |
}) |
| 49 | 49 |
|
| ... | ... |
@@ -52,7 +52,7 @@ setReplaceMethod("pData",
|
| 52 | 52 |
object = "BSseq", |
| 53 | 53 |
value = "DataFrame"), |
| 54 | 54 |
function(object, value) {
|
| 55 |
- object@colData <- value |
|
| 55 |
+ colData(object) <- value |
|
| 56 | 56 |
object |
| 57 | 57 |
}) |
| 58 | 58 |
|