Re: [R] The best way for making speciall matrix

2020-05-23 Thread Rui Barradas
Hello, Please keep this on the list, R-help is threaded and it becomes part of the archives, maybe it will be usefull to others. You are now asking 2 other different questions. Are you looking for something like this? two_values_mat <- function(n, fill = 1, diagonal = 0){ m <-

Re: [R] The best way for making speciall matrix

2020-05-23 Thread Abby Spurdle
This sounds like a homework question... But... numerical linear algebra rocks... cbind (diag (1:3), 4:6) On Sat, May 23, 2020 at 9:46 PM Vahid Borji wrote: > > Hi my friends, > > I want to make the below matrix in r: > > 1 0 0 4 > > 0 2 0 5 > > 0 0 3 6 > > I used the below code: > >

Re: [R] The best way for making speciall matrix

2020-05-23 Thread Rui Barradas
Hello, Use diag() and cbind(). special_mat <- function(n){ if(n %% 2 != 0) { msg <- paste(sQuote(n), 'is not a multiple of 2, will use') n <- 2*(n%/% 2) msg <- paste(msg, sQuote(n)) warning(msg) } x <- diag(n/2) diag(x) <- seq.int(n/2) cbind(x, (n/2 + 1):n) }

Re: [R] The best way for making speciall matrix

2020-05-23 Thread Ashim Kapoor
Dear Vahid, Would this help? > row1<- c(1,0,0,4) > row2<- c(0,2,0,5) > row3<- c(0,0,3,6) > mymatrix <- rbind(row1,row2,row3) > mymatrix [,1] [,2] [,3] [,4] row11004 row20205 row30036 > Best Regards, Ashim On Sat, May 23, 2020 at 3:16 PM

[R] The best way for making speciall matrix

2020-05-23 Thread Vahid Borji
Hi my friends, I want to make the below matrix in r: 1 0 0 4 0 2 0 5 0 0 3 6 I used the below code: matrix(c(1,0,0,0,2,0,0,0,3,4,5,6),nrow=3) My code works. But I do not like my solution way. I am thinking to find the simplest way for making this matrix. Do you think my code is the simplest