# NOT RUN {
# Fully numeric data frame.
x <- data.frame(A=c(1,2,3,4), B=c(0,1,0,NA), C=c(2,3,4,5))
print(nroRcppMatrix(data=x, trim=TRUE))
# Matrix of characters, some of which can be converted to numbers.
x <- matrix(c("1","2","b","4","","6","7","8"), nrow=4, ncol=2)
print(nroRcppMatrix(data=x, trim=TRUE))
# Object that can be converted to numbers.
x <- list(text="abc", value="123")
print(nroRcppMatrix(data=x, trim=TRUE))
# Unusable object.
x <- list(text="abc", value="123", multiple=c("a","b","c"))
print(nroRcppMatrix(data=x, trim=TRUE))
# }
Run the code above in your browser using DataLab