Printing matrix/table in a procedure

Dear All,

I would like to get a matrix (table) printed in a procedure, as
attempted below. Please help. Thanks.

test<-function(x){
  ? table<-matrix(x,nrow=4)
  ? cat("\nTable:\n",table)
invisible(list(table=table))
}

x<-1:20
test(x)

Hello,

What's wrong with

test <- function(x){
? table <- matrix(x, nrow = 4)
? cat("\nTable:\n")
? print(table)
? invisible(list(table = table))
}


Hope this helps,

Rui Barradas

?s 10:33 de 15/05/19, Steven Yen escreveu:

Dear All,

I would like to get a matrix (table) printed in a procedure, as
attempted below. Please help. Thanks.

test<-function(x){
? ? table<-matrix(x,nrow=4)
? ? cat("\nTable:\n",table)
invisible(list(table=table))
}

x<-1:20
test(x)