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.
- checksums.yaml +4 -4
- data/share/Rlib/svg.R +2 -2
- data/share/Rlib/util.R +6 -0
- metadata +1 -1
checksums.yaml
CHANGED
|
@@ -1,7 +1,7 @@
|
|
|
1
1
|
---
|
|
2
2
|
SHA1:
|
|
3
|
-
metadata.gz:
|
|
4
|
-
data.tar.gz:
|
|
3
|
+
metadata.gz: 7bb9b027bd080c570153ef54afc0e8811d3248bd
|
|
4
|
+
data.tar.gz: 730e709d5f66cb69ee6df6a4e1209492afe98fc1
|
|
5
5
|
SHA512:
|
|
6
|
-
metadata.gz:
|
|
7
|
-
data.tar.gz:
|
|
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
|
|