tmp1 <- matrix(1:12,ncol=3)
tmp2 <- 1:3
gsi.add(tmp1,tmp2)
gsi.sub(tmp1,tmp2)
gsi.mul(tmp1,tmp2)
gsi.div(tmp1,tmp2)
gsi.add(tmp2,tmp2)
gsi.sub(tmp2,tmp2)
gsi.mul(tmp2,tmp2)
gsi.div(tmp2,tmp2)
gsi.add(tmp1,tmp1)
gsi.sub(tmp1,tmp1)
gsi.mul(tmp1,tmp1)
gsi.div(tmp1,tmp1)Run the code above in your browser using DataLab