... | ... |
@@ -56,7 +56,7 @@ setMethod('imgData', 'SVPExperiment', function(x){ |
56 | 56 |
return(x) |
57 | 57 |
}) |
58 | 58 |
|
59 |
-#' @rdname SVP-setters |
|
59 |
+#' @rdname SVP-accessors |
|
60 | 60 |
#' @importFrom S4Vectors isEmpty |
61 | 61 |
#' @exportMethod imgData<- |
62 | 62 |
setReplaceMethod('imgData', c('SVPExperiment', "DataFrame"), function(x, value){ |
... | ... |
@@ -73,7 +73,7 @@ setReplaceMethod('imgData', c('SVPExperiment', "DataFrame"), function(x, value){ |
73 | 73 |
return(x) |
74 | 74 |
}) |
75 | 75 |
|
76 |
-#' @rdname SVP-setters |
|
76 |
+#' @rdname SVP-accessors |
|
77 | 77 |
#' @exportMethod imgData<- |
78 | 78 |
setReplaceMethod('imgData', c("SVPExperiment", "NULL"), function(x, value){ |
79 | 79 |
flag <- .check_element_obj(x, key='imgData', basefun = int_metadata, namefun = names) |
... | ... |
@@ -84,7 +84,7 @@ setReplaceMethod('imgData', c("SVPExperiment", "NULL"), function(x, value){ |
84 | 84 |
return(x) |
85 | 85 |
}) |
86 | 86 |
|
87 |
-#' @rdname SVP-setters |
|
87 |
+#' @rdname SVP-accessors |
|
88 | 88 |
#' @aliases spatialCoords<-,SVPExperiment |
89 | 89 |
#' @exportMethod spatialCoords<- |
90 | 90 |
setReplaceMethod("spatialCoords", c("SVPExperiment", "matrix_Or_NULL"), function(x, value){ |
... | ... |
@@ -112,7 +112,7 @@ setReplaceMethod("spatialCoords", c("SVPExperiment", "matrix_Or_NULL"), function |
112 | 112 |
}) |
113 | 113 |
|
114 | 114 |
|
115 |
-#' @rdname SVP-setters |
|
115 |
+#' @rdname SVP-accessors |
|
116 | 116 |
#' @importFrom SpatialExperiment spatialCoordsNames<- |
117 | 117 |
#' @exportMethod spatialCoordsNames<- |
118 | 118 |
setReplaceMethod("spatialCoordsNames", c('SVPExperiment', 'character'), |
... | ... |
@@ -9,6 +9,8 @@ |
9 | 9 |
\alias{spatialCoordsNames<-,SVPExperiment,character-method} |
10 | 10 |
\alias{imgData<-,SVPExperiment,DataFrame-method} |
11 | 11 |
\alias{imgData<-,SVPExperiment,NULL-method} |
12 |
+\alias{spatialCoords<-,SVPExperiment,matrix_Or_NULL-method} |
|
13 |
+\alias{spatialCoords<-,SVPExperiment} |
|
12 | 14 |
\title{Some accessor funtions to get the internal slots of SVPExperiment} |
13 | 15 |
\usage{ |
14 | 16 |
\S4method{spatialCoords}{SVPExperiment}(x) |
... | ... |
@@ -17,15 +19,23 @@ |
17 | 19 |
|
18 | 20 |
\S4method{imgData}{SVPExperiment}(x) |
19 | 21 |
|
22 |
+\S4method{imgData}{SVPExperiment,DataFrame}(x) <- value |
|
23 |
+ |
|
24 |
+\S4method{imgData}{SVPExperiment,NULL}(x) <- value |
|
25 |
+ |
|
26 |
+\S4method{spatialCoords}{SVPExperiment,matrix_Or_NULL}(x) <- value |
|
27 |
+ |
|
28 |
+\S4method{spatialCoordsNames}{SVPExperiment,character}(x) <- value |
|
29 |
+ |
|
20 | 30 |
\S4method{show}{SVPExperiment}(object) |
21 | 31 |
} |
22 | 32 |
\arguments{ |
23 | 33 |
\item{x}{a \linkS4class{SVPExperiment} class.} |
24 | 34 |
|
25 |
-\item{object}{a \linkS4class{SVPExperiment} class.} |
|
26 |
- |
|
27 | 35 |
\item{value}{matrix for \code{spatialCoords(object) <- value} |
28 | 36 |
character for \code{spatialCoordsNames(object) <- value}.} |
37 |
+ |
|
38 |
+\item{object}{a \linkS4class{SVPExperiment} class.} |
|
29 | 39 |
} |
30 | 40 |
\value{ |
31 | 41 |
matrix or character or print the information of object |