as.matrix(make.prec(c(.4), c(4,3),'m1p1'))
as.matrix(make.prec(c(.4,.3), c(4,3),'m1p2'))
as.matrix(make.prec(c(.4,.3,.2), c(4,3),'m2p3'))
as.matrix(make.prec(c(.4,.3,.2,.1),c(4,3),'m2p4'))Run the code above in your browser using DataLab