Running ‘ceil.R’ [0s/1s]
  Running ‘cell.R’ [0s/1s]
  Running ‘eye.R’ [0s/1s]
  Running ‘factors.R’ [2s/4s]
  Running ‘fileparts.R’ [0s/1s]
  Running ‘find.R’ [0s/1s]
  Running ‘fix.R’ [0s/1s]
  Running ‘fliplr.R’ [0s/1s]
  Running ‘flipud.R’ [0s/1s]
  Running ‘fullfile.R’ [0s/1s]
  Running ‘hilb.R’ [0s/1s]
  Running ‘isempty.R’ [0s/1s]
  Running ‘isprime.R’ [0s/1s]
  Running ‘jet.colors.R’ [0s/1s]
  Running ‘linspace.R’ [0s/1s]
  Running ‘logspace.R’ [0s/1s]
  Running ‘magic.R’ [0s/1s]
  Running ‘meshgrid.R’ [0s/1s]
  Running ‘mkconstarray.R’ [0s/1s]
  Running ‘mod.R’ [0s/1s]
  Running ‘ndims.R’ [0s/1s]
  Running ‘nextpow2.R’ [0s/1s]
  Running ‘numel.R’ [0s/1s]
  Running ‘ones.R’ [0s/1s]
  Running ‘padarray.R’ [0s/1s]
  Running ‘pascal.R’ [0s/1s]
  Running ‘pow2.R’ [0s/1s]
  Running ‘primes.R’ [0s/1s]
  Running ‘rem.R’ [0s/1s]
  Running ‘repmat.R’ [0s/1s]
  Running ‘reshape.R’ [0s/1s]
  Running ‘rot90.R’ [0s/1s]
  Running ‘size.R’ [0s/1s]
  Running ‘std.R’ [0s/1s]
  Running ‘strcmp.R’ [0s/1s]
  Running ‘sum.R’ [0s/1s]
  Running ‘tictoc.R’ [0s/7s]
  Running ‘vander.R’ [0s/1s]
  Running ‘zeros.R’ [0s/1s]
Running the tests in ‘tests/rem.R’ failed.
Complete output:
  > ###
  > ### $Id: rem.R 51 2014-02-05 21:22:28Z plroebuck $
  > ###
  > 
  > 
  > ##-----------------------------------------------------------------------------
  > test.rem <- function(input, expected) {
  +     output <- do.call(getFromNamespace("rem", "matlab"), input)
  +     identical(output, expected)
  + }
  > 
  > X.mat <- matrix(1:9, nrow = 3, byrow = TRUE)
  > rem.expected.X.mat <- matrix(c(3:1, 6:4, 9:7), nrow = 3, byrow = TRUE)
  > rem.expected.X.mat.Y0 <- matrix(rep(NaN, length(X.mat)), nrow = nrow(X.mat))
  > rem.expected.X.mat.Y1 <- matrix(rep(1, length(X.mat)), nrow = nrow(X.mat))
  > rem.expected.X.mat.Y2 <- matrix(rep(c(1, 0), 5)[1:length(X.mat)],
  +                                 nrow = nrow(X.mat))
  > rem.expected.X.mat.Y3 <- matrix(rep(c(1, 2, 0), nrow(X.mat)),
  +                                 nrow = nrow(X.mat),
  +                                 byrow = TRUE)
  > 
  > test.rem(list(x = X.mat, y = 0), rem.expected.X.mat.Y0)
  Error in x > 0 && y > 0 : 'length = 9' in coercion to 'logical(1)'
  Calls: test.rem -> do.call -> <Anonymous>
  Execution halted