Quando executamos o código da primeira parte do desafio opcional a coluna do movimento fica completa somente com a string "HMP_Dataset". Penso que essa parte do código está com problemas :
movimento = unlist(strsplit(arquivo, "/")[1][1])[1]
Tentei fazer alguma alterações, mas todas sem sucesso. Sem arrumar isso não consigo prosseguir para as outras etapas do desafio opcional.
Agradeço desde já!