RcppExamples/R/RcppMatrixExample.R at master · cran/RcppExamples

26 lines (24 loc) · 982 Bytes

## RcppMatrixExample.R: RcppMatrix example

## This file is part of RcppExamples.

## RcppExamples is free software: you can redistribute it and/or modify it

## under the terms of the GNU General Public License as published by

## the Free Software Foundation, either version 2 of the License, or

## (at your option) any later version.

## RcppExamples is distributed in the hope that it will be useful, but

## WITHOUT ANY WARRANTY; without even the implied warranty of

## MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the

## GNU General Public License for more details.

## You should have received a copy of the GNU General Public License

## along with RcppExamples. If not, see <http://www.gnu.org/licenses/>.

RcppMatrixExample <- function(mat=matrix(seq(1,9)^2, ncol=3)) {

## Make the call...

val <- MatrixExample(mat)

val

}

Provide feedback