R/base_fast.read.table.R

Defines functions fast.read.table

#fast read table function
.fast.read.table = function(file, nrow){
  # read contents
  countC <- scan( file = file, what = character(), sep = "\t", skip = 0 )
  countC1 <- matrix( countC, nrow, byrow = TRUE )
  return(countC1)
} 
yezhengSTAT/permseq_0.3.0 documentation built on Aug. 17, 2017, 1:27 a.m.