Re: [R] write.matrix.csr(e1071) bug

Peter: Yes, this is a bug. The line if ([EMAIL PROTECTED] <= nrow(x)) should actually read if (([EMAIL PROTECTED] <= length([EMAIL PROTECTED])) && ([EMAIL PROTECTED] < [EMAIL PROTECTED] + 1])) --> fixed upstream. Thanks David Hello, The write.matrix.csr() function of the e1071 p

[R] write.matrix.csr(e1071) bug

Hello, The write.matrix.csr() function of the e1071 package contains a bug. Try the following: library(e1071) m <- 1 - diag(10) sm <- as.matrix.csr(m) write.matrix.csr(sm) The resulting file (out.dat) contains only the two lines below: 2:1 3:1 4:1 5:1 6:1 7:1 8: