Actualmente estoy leyendo en un archivo usando el paquetereadr. La idea es usarread_delim leer en fila por fila para encontrar las columnas máximas en mi archivo de datos no estructurados. El código muestra que hayparsing problemas. Sé de estos y trataré con el tipo de columna después de la importación. ¿Hay alguna manera de apagar elproblems() como siempreoptions(warn) no está trabajando

i=1
max_col <- 0
options(warn = -1)
while(i != "stop")
{
  n_col<- ncol(read_delim("file.txt", n_max = 1, skip = i, delim="\t"))
  if(n_col > max_col) {
    max_col <- n_col
    print(max_col)
  }
  i <- i+1
  if(n_col==0) i<-"stop"
}
options(warn = 0) 

La salida a la consola que estoy tratando de suprimir es la siguiente:

.See problems(...) for more details.
Warning: 11 parsing failures.
row      col   expected  actual
  1 1####4 valid date 1###8