← Back to branch summary

~ubuntu-branches/debian/sid/cairodevice/sid

« back to all changes in this revision

Viewing changes to R/cairoDevice.R

  • Committer: Package Import Robot
  • Author(s): Dirk Eddelbuettel
  • Date: 2015-01-20 07:03:22 UTC
  • mfrom: (1.1.18)
  • Revision ID: package-import@ubuntu.com-20150120070322-eqv2elyy462k2pln
Tags: 2.21-1
* New upstream release

* debian/control: Set Standards-Version: to current version 
* debian/control: Set Build-Depends: to current R version 

Show diffs side-by-side

added added

removed removed

Lines of Context:
R/cairoDevice.R
1
 
Cairo <- function(width = 7, height = 7, pointsize = 8,
 
1
Cairo <- function(width = 7, height = 7, pointsize = 12,
2
2
                  surface = c("screen", "png", "pdf", "ps", "svg"),
3
3
                  filename = NULL)
4
4
{
13
13
  return(invisible(TRUE))
14
14
}
15
15
 
16
 
Cairo_png <- function(filename, width = 7, height = 7, pointsize = 10)
 
16
Cairo_png <- function(filename, width = 7, height = 7, pointsize = 12)
17
17
{
18
18
  Cairo(width, height, pointsize, "png", filename)
19
19
}
20
 
Cairo_pdf <- function(filename, width = 7, height = 7, pointsize = 10)
 
20
Cairo_pdf <- function(filename, width = 7, height = 7, pointsize = 12)
21
21
{
22
22
  Cairo(width, height, pointsize, "pdf", filename)
23
23
}
24
 
Cairo_ps <- function(filename, width = 7, height = 7, pointsize = 10)
 
24
Cairo_ps <- function(filename, width = 7, height = 7, pointsize = 12)
25
25
{
26
26
  Cairo(width, height, pointsize, "ps", filename)
27
27
}
28
 
Cairo_svg <- function(filename, width = 7, height = 7, pointsize = 10)
 
28
Cairo_svg <- function(filename, width = 7, height = 7, pointsize = 12)
29
29
{
30
30
  Cairo(width, height, pointsize, "svg", filename)
31
31
}
32
32
 
33
 
asCairoDevice <- function(widget, pointsize = 10, width = 500, height = 500)
 
33
asCairoDevice <- function(widget, pointsize = 12, width = 500, height = 500)
34
34
{
35
35
  w <- -1
36
36
  h <- -1