Unit: microseconds
expr min lq mean median uq max neval
write(as.matrix(read.table(text = x)), "", 3) 707.306 734.9585 797.0310 761.8995 792.547 1469.917 100
write(unlist(read.table(text = x)), "", 3) 661.406 688.2050 784.5385 712.5800 779.718 2393.032 100