• using R version 2.8.0 Under development (unstable) (2008-09-03 r46487)
• using session charset: UTF-8
• checking for file 'matlab/DESCRIPTION' ... OK
• this is package 'matlab' version '0.8-1'
• checking package name space information ... OK
• checking package dependencies ... OK
• checking if this is a source package ... OK
• checking whether package 'matlab' can be installed ... OK
• checking package directory ... OK
• checking for portable file names ... OK
• checking for sufficient/correct file permissions ... OK
• checking DESCRIPTION meta-information ... OK
• checking top-level files ... OK
• checking index information ... OK
• checking package subdirectories ... OK
• checking R files for non-ASCII characters ... OK
• checking R files for syntax errors ... OK
• checking whether the package can be loaded ... OK
• checking whether the package can be loaded with stated dependencies ... OK
• checking whether the name space can be loaded with stated dependencies ... OK
• checking for unstated dependencies in R code ... OK
• checking S3 generic/method consistency ... OK
• checking replacement functions ... OK
• checking foreign function calls ... OK
• checking R code for possible problems ... OK
• checking Rd files ... OK
• checking Rd cross-references ... OK
• checking for missing documentation entries ... OK
• checking for code/documentation mismatches ... OK
• checking Rd \usage sections ... OK
• creating matlab-Ex.R ... OK
• checking examples ... ERROR
  Running examples in 'matlab-Ex.R' failed.
  The error most likely occurred in:
  
  > ### * colorbar
  >
  > flush(stderr()); flush(stdout())
  >
  > ### Name: colorbar
  > ### Title: MATLAB colorbar function
  > ### Aliases: colorbar
  > ### Keywords: hplot
  >
  > ### ** Examples
  >
  > grdev <- function(...) {
  + get(getOption("device"))(...)
  + }
  >
  > doPlot <- function(C, cb.loc = c("EastOutside",
  + "WestOutside",
  + "NorthOutside",
  + "SouthOutside"), ...) {
  + saved.par <- par(no.readonly = TRUE)
  + on.exit(par(saved.par))
  +
  + layout.EO <- function() {
  + ## divide the device into one row and nine columns
  + ## allocate figure 1 the first eight columns
  + ## allocate figure 2 the last column
  + layout(matrix(c(1, 1, 1, 1, 1, 1, 1, 1, 2), ncol = 9))
  + }
  +
  + layout.WO <- function() {
  + ## divide the device into one row and nine columns
  + ## allocate figure 1 the last eight columns
  + ## allocate figure 2 the first column
  + layout(matrix(c(2, 1, 1, 1, 1, 1, 1, 1, 1), ncol = 9))
  + }
  +
  + layout.NO <- function() {
  + ## divide the device into six rows and one column
  + ## allocate figure 1 the last five rows
  + ## allocate figure 2 the first row
  + layout(matrix(c(2, 1, 1, 1, 1, 1), nrow = 6))
  + }
  +
  + layout.SO <- function() {
  + ## divide the device into six rows and one column
  + ## allocate figure 1 the first five rows
  + ## allocate figure 2 the last row
  + layout(matrix(c(1, 1, 1, 1, 1, 2), nrow = 6))
  + }
  +
  + location <- match.arg(cb.loc)
  + switch(EXPR = location,
  + EastOutside = layout.EO(),
  + WestOutside = layout.WO(),
  + NorthOutside = layout.NO(),
  + SouthOutside = layout.SO())
  +
  + imagesc(C, ...)
  + colorbar(C, location, ...)
  + }
  >
  > values <- matrix(c(seq(1, 5, by = 1),
  + seq(2, 10, by = 2),
  + seq(3, 15, by = 3)), nrow = 3, byrow = TRUE)
  >
  > grdev(width = 8, height = 7)
  Error in get(getOption("device")) : invalid first argument
  Calls: grdev -> get
  Execution halted