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) -- styen at ntu.edu.tw (S.T. Yen) [[alternative HTML version deleted]]
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) >
Great! Thanks. On 5/15/2019 7:00 PM, Rui Barradas wrote:> 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) >> >-- styen at ntu.edu.tw (S.T. Yen) [[alternative HTML version deleted]]