readr en R
read_csv es más rápido que read.csv, y te dice qué adivinó.
library(readr)
library(dplyr)
text <- "day,lang,tpm,note\n2026-07-29,r,96,\n2026-07-30,python,104,fast\n"
runs <- read_csv(text,
col_types = cols(
day = col_date(format = "%Y-%m-%d"),
lang = col_character(),
tpm = col_integer(),
note = col_character()
),
na = c("", "NA"))
print(runs)
print(sapply(runs, class))
path <- tempfile(fileext = ".csv")
write_csv(runs, path)
print(nrow(read_csv(path, show_col_types = FALSE)))
Cómo funciona
col_typesfrena la adivinanza y documenta el esquema.nadice qué cadenas significan faltante.problems()reporta las filas que no encajaron.
El intento, en números
- Líneas
- 19
- Caracteres a escribir
- 423
- Tokens
- 104
- Ritmo de tres estrellas
- 100 tpm
Al ritmo de tres estrellas de 100 tokens por minuto, este intento toma unos 62 segundos.
Paso 1 de 3 en Leer y seleccionar; paso 9 de 12 en Remodelar y leer.