Eliminar barras invertidas y fecha con diferente formatos

[Richardcns88]

Saludos cordiales, necesito de su ayuda!

Tengo un archivo CSV con dos casos por resolver:

Caso 1.- En la columna "nom_arch" se ha registrado ruta del archivo + nombre del archivo + extensión (D:\richard.narvaez\Downloads\CAMPANA FLU 2023-2024\854_cai3.csv), lo que necesito es solo quedarme con el nombre del archivo (854_cai3), intenté utilizar str_remove pero no me funciona.

Caso 2.- Deseo poner a la columna "fecha_vacunacion" como variable FECHA pero me dicen que hay diferentes formatos (DIA/MES/AAAA, MES/DIA/AÑO), que hago?

Adjunto archivo para que me enseñen cómo hacerlo, gracias de antemano!

consolidado_flu_2023_2024.csv

[jrkrideau]

@Richardcns88

Caso 1.- En la columna "nom_arch" se ha registrado ruta del archivo + nombre del archivo + extensión (D:\richard.narvaez\Downloads\CAMPANA FLU 2023-2024\854_cai3.csv), lo que necesito es solo quedarme con el nombre del archivo (854_cai3), intenté utilizar str_remove pero no me funciona.

Creo que esto debería funcionar. No tengo idea de cómo lidiar con los tiempos difíciles.

I think this should work. I have no idea deal with the mixed times

library(data.table)
library(stringi)

DT <- fread("consolidado_flu_2023_2024.csv")
DT[, nom_arch := substring(nom_arch, 52, 54)]