read-table-delim-does-not-read-in-all-rows.R

#read.table does not read in all rows!
rm(list = ls()); ls()

## character(0)

###############################input data_1 
dir_path <- "C:\\Users\\xut2\\Desktop\\2023\\2023_DILI_CI\\"
dir_path_name <- dir(dir_path,pattern = ".*",full.names = T)
dir_path_name

## [1] "C:\\Users\\xut2\\Desktop\\2023\\2023_DILI_CI\\code_1_check.R"                                            
## [2] "C:\\Users\\xut2\\Desktop\\2023\\2023_DILI_CI\\Memo Style.pdf"                                            
## [3] "C:\\Users\\xut2\\Desktop\\2023\\2023_DILI_CI\\SMLIES"                                                    
## [4] "C:\\Users\\xut2\\Desktop\\2023\\2023_DILI_CI\\tox21_production_protocols_curve_rank2_02242023_by_cas.txt"

data_1 <- read.delim2(grep("SMLIES",dir_path_name,value = T),check.names = F, header = T,stringsAsFactors = F)
dim(data_1) #[1] 59342    33

## [1] 59342    33

data_1 <- read.delim2(grep("SMLIES",dir_path_name,value = T),check.names = F, header = T,stringsAsFactors = F, quote = "")
dim(data_1) #[1] 63883    33

## [1] 63883    33

##https://www.biostars.org/p/221983/