Мне нужно создать функцию в R, которая принимает матрицу в качестве входных данных и возвращает список

Question

Это код, который я пытался использовать для решения проблемы, но мои результаты не точны.Любые предложения будут оценены.спасибо

> fun1 <- function(x,y){
   ##input of the function
   x<- matrix(data = x, nrow=20,ncol =0 )
  ##get mean of rows and columns
   mean_row<- rowMeans(x)
   mean_col<- colMeans(x)
   ##create the return value y as a list
   y<- list(x, mean_row, mean_col)
   return(y)
 }