Browse code

Merge branch 'rcastelo:master' into master

Pablo Rodriguez authored on 18/11/2021 08:08:18 • GitHub committed on 18/11/2021 08:08:18
Showing 3 changed files

... ...
@@ -1,5 +1,5 @@
1 1
 Package: GSVA
2
-Version: 1.41.3
2
+Version: 1.41.4
3 3
 Title: Gene Set Variation Analysis for microarray and RNA-seq data
4 4
 Authors@R: c(person("Justin", "Guinney", role=c("aut", "cre"), email="justin.guinney@sagebase.org"),
5 5
              person("Robert", "Castelo", role="aut", email="robert.castelo@upf.edu"),
... ...
@@ -1,3 +1,10 @@
1
+CHANGES IN VERSION 1.50
2
+-----------------------
3
+
4
+BUG FIXES
5
+
6
+   o Bugfix for https://github.com/rcastelo/GSVA/issues/54 to force filtering genes with constant expression behaving the same regardless of the delayed or non-delayed nature of the data container.
7
+
1 8
 CHANGES IN VERSION 1.40
2 9
 -----------------------
3 10
 
... ...
@@ -13,7 +13,8 @@ test_delayed <- function(){
13 13
   x1 <- gsva(m, gene.sets, method="plage")
14 14
   x2 <- gsva(h5, gene.sets, method="plage")
15 15
   
16
-  checkEqualsNumeric(as.vector(t(x1)), as.vector(t(x2)))
16
+  ## SVD sign is arbitrary and implementation-dependent
17
+  checkEqualsNumeric(abs(as.vector(t(x1))), abs(as.vector(t(x2))))
17 18
   
18 19
   x1 <- gsva(m, gene.sets, method="zscore")
19 20
   x2 <- gsva(h5, gene.sets, method="zscore")
... ...
@@ -25,7 +26,3 @@ test_delayed <- function(){
25 26
   
26 27
   checkEqualsNumeric(as.vector(t(x1)), as.vector(t(x2)))
27 28
 }
28
-
29
-
30
-
31
-