Browse code

fix typo

Zuguang Gu authored on 20/08/2017 05:56:30
Showing7 changed files

... ...
@@ -154,7 +154,7 @@ setMethod(f = "add_heatmap",
154 154
     ht_name = names(object@ht_list)
155 155
     which_duplicated = duplicated(ht_name)
156 156
     if(any(which_duplicated)) {
157
-        warning(paste0("Heatmap/row annotaiton names are duplicated: ", paste(ht_name[which_duplicated], collapse = ", ")))
157
+        warning(paste0("Heatmap/row annotation names are duplicated: ", paste(ht_name[which_duplicated], collapse = ", ")))
158 158
     }
159 159
 
160 160
     l = which(sapply(object@ht_list, inherits, "Heatmap"))
... ...
@@ -1050,7 +1050,7 @@ column_anno_text = function(...) {
1050 1050
 # == param
1051 1051
 # -at numeric index in the original matrix
1052 1052
 # -labels corresponding labels
1053
-# -which column annotaiton or row annotation
1053
+# -which column annotation or row annotation
1054 1054
 # -side side of the labels. If it is a column annotation, permitted values are "top" and "bottom";
1055 1055
 #       If it is a row annotation, permitted values are "left" and "right".
1056 1056
 # -lines_gp graphic settings for the segments
... ...
@@ -400,7 +400,7 @@ unify_mat_list = function(mat_list, default = 0) {
400 400
 
401 401
 
402 402
 # == title
403
-# Column barplot annotaiton for oncoPrint
403
+# Column barplot annotation for oncoPrint
404 404
 #
405 405
 # == details
406 406
 # This function is only used for column annotation
... ...
@@ -14,7 +14,7 @@ anno_link(at, labels, which = c("column", "row"), side = ifelse(which == "column
14 14
 
15 15
   \item{at}{numeric index in the original matrix}
16 16
   \item{labels}{corresponding labels}
17
-  \item{which}{column annotaiton or row annotation}
17
+  \item{which}{column annotation or row annotation}
18 18
   \item{side}{side of the labels. If it is a column annotation, permitted values are "top" and "bottom"; If it is a row annotation, permitted values are "left" and "right".}
19 19
   \item{lines_gp}{graphic settings for the segments}
20 20
   \item{labels_gp}{graphic settings for the labels}
... ...
@@ -1,10 +1,10 @@
1 1
 \name{anno_oncoprint_barplot}
2 2
 \alias{anno_oncoprint_barplot}
3 3
 \title{
4
-Column barplot annotaiton for oncoPrint
4
+Column barplot annotation for oncoPrint
5 5
 }
6 6
 \description{
7
-Column barplot annotaiton for oncoPrint
7
+Column barplot annotation for oncoPrint
8 8
 }
9 9
 \usage{
10 10
 anno_oncoprint_barplot()
... ...
@@ -13,7 +13,7 @@ Draw the single annotation
13 13
 
14 14
   \item{object}{a \code{\link{SingleAnnotation-class}} object.}
15 15
   \item{index}{a vector of orders}
16
-  \item{k}{if row annotation is splitted, the value identifies which row slice. It is only used for the naems of the viewport which contains the annotation graphics.}
16
+  \item{k}{if row annotation is splitted, the value identifies which row slice. It is only used for the names of the viewport which contains the annotation graphics.}
17 17
   \item{n}{total number of row slices}
18 18
 
19 19
 }
... ...
@@ -6,7 +6,7 @@ draw(anno, c(1, 4, 3, 5, 2))
6 6
 dev.off()
7 7
 
8 8
 test_that("discrete color mapping", {
9
-	expect_that(show(anno), prints_text("An annotaiton with discrete color mapping"))
9
+	expect_that(show(anno), prints_text("An annotation with discrete color mapping"))
10 10
 })
11 11
 
12 12
 pdf(NULL)
... ...
@@ -19,7 +19,7 @@ draw(anno, 1:10)
19 19
 dev.off()
20 20
 
21 21
 test_that("continuous color mapping", {
22
-	expect_that(show(anno), prints_text("An annotaiton with continuous color mapping"))
22
+	expect_that(show(anno), prints_text("An annotation with continuous color mapping"))
23 23
 })
24 24
 
25 25
 pdf(NULL)