rbbt-util 5.25.40 → 5.25.41

Sign up to get free protection for your applications and to get access to all the features.
Files changed (4) hide show
  1. checksums.yaml +4 -4
  2. data/share/Rlib/svg.R +2 -2
  3. data/share/Rlib/util.R +6 -0
  4. metadata +1 -1
checksums.yaml CHANGED
@@ -1,7 +1,7 @@
1
1
  ---
2
2
  SHA1:
3
- metadata.gz: 9433fb814b44267945865834fea4990b38cbeb96
4
- data.tar.gz: 1f1a04136934f52f3a3ff4d7826b2e34a7cddff1
3
+ metadata.gz: 7bb9b027bd080c570153ef54afc0e8811d3248bd
4
+ data.tar.gz: 730e709d5f66cb69ee6df6a4e1209492afe98fc1
5
5
  SHA512:
6
- metadata.gz: a5d6572ac860c7028a6abd78fe0bb8cc9e3ca563eccda0e11d404a665a15e29b5a7e5aba43193ed78325e7c92f16dcbeabf876eea28e33c39859737313e76b07
7
- data.tar.gz: 2db09b238b2d769ee4b686ca13bc3d9c636af2c3a08512e2adac5801887ec75553a27c4bb038eed17d24fe9117911b337f6c51f17f87ed168de1523b43635108
6
+ metadata.gz: a144d97ec06bc8475a8927e1d4c9d8245cfde81b70d822f245892245f664071b4b79e184d2d7266773dff7b3783b4b500d2b775a1eb08876f0d87b2f76492754
7
+ data.tar.gz: 35a656ad8ccc7786e124c41e2cf3303543b878d02e016233c09f678f46e8d855039a77d7241db9055db4ee7ff8d8d768097b08fd75235e5d7d3fc36d536e8ca8
data/share/Rlib/svg.R CHANGED
@@ -32,7 +32,7 @@ rbbt.SVG.extract <- function(plot, size=NULL, prefix=NULL, ...){
32
32
  xml
33
33
  }
34
34
 
35
- rbbt.SVG.save <- function(filename, plot, width=NULL, height=NULL){
35
+ rbbt.SVG.save <- function(filename, plot, width=NULL, height=NULL, ...){
36
36
  if (is.null(width)){
37
37
  if (is.null(height)){
38
38
  size = NULL
@@ -47,7 +47,7 @@ rbbt.SVG.save <- function(filename, plot, width=NULL, height=NULL){
47
47
  }
48
48
  }
49
49
 
50
- xml = rbbt.SVG.extract(plot, size)
50
+ xml = rbbt.SVG.extract(plot, size, ...)
51
51
  fileConn<-file(filename, 'w')
52
52
  cat(xml, file=fileConn)
53
53
  close(fileConn)
data/share/Rlib/util.R CHANGED
@@ -523,6 +523,12 @@ rbbt.png_plot <- function(filename, p, width=500, height=500, ...){
523
523
  eval(parse(text=p));
524
524
  }
525
525
 
526
+ rbbt.tiff_plot <- function(filename, p, width=500, height=500, ...){
527
+ tiff(filename=filename, width=width, height=height, ...);
528
+ eval(parse(text=p));
529
+ }
530
+
531
+
526
532
  rbbt.pheatmap <- function(filename, data, width=800, height=800, take_log=FALSE, stdize=FALSE, positive=FALSE, ...){
527
533
  rbbt.require('pheatmap')
528
534
 
metadata CHANGED
@@ -1,7 +1,7 @@
1
1
  --- !ruby/object:Gem::Specification
2
2
  name: rbbt-util
3
3
  version: !ruby/object:Gem::Version
4
- version: 5.25.40
4
+ version: 5.25.41
5
5
  platform: ruby
6
6
  authors:
7
7
  - Miguel Vazquez