... | ... |
@@ -811,7 +811,6 @@ setMethod("Modifier", |
811 | 811 |
#' # the Modifier or ModifierSet object |
812 | 812 |
#' sdfl <- aggregate(e5sd) |
813 | 813 |
#' mi <- aggregate(msi[[1]]) |
814 |
-#' msi <- aggregate(msi) |
|
815 | 814 |
NULL |
816 | 815 |
|
817 | 816 |
.check_aggregate_modifier <- function(data, x){ |
... | ... |
@@ -927,7 +926,6 @@ setMethod(f = "hasAggregateData", |
927 | 926 |
#' data(msi,package="RNAmodR") |
928 | 927 |
#' # modify() triggers the search for modifications in the data contained in |
929 | 928 |
#' # the Modifier or ModifierSet object |
930 |
-#' msi <- modify(msi) |
|
931 | 929 |
#' mi <- modify(msi[[1]]) |
932 | 930 |
NULL |
933 | 931 |
|
... | ... |
@@ -63,6 +63,5 @@ object and has to be implemented for each individual \code{Modifier} class. |
63 | 63 |
data(msi,package="RNAmodR") |
64 | 64 |
# modify() triggers the search for modifications in the data contained in |
65 | 65 |
# the Modifier or ModifierSet object |
66 |
-msi <- modify(msi) |
|
67 | 66 |
mi <- modify(msi[[1]]) |
68 | 67 |
} |