22  Hướng dẫn convert từ file csv qua tsv trong R

Ví dụ bạn có 1 file file_example_1.csv có cấu trúc như sau:

Giờ bạn muốn convert thành dạng này, tức là thay thế dấu phân cách (delimiter) từ dấu phẩy , mặc định phân cách giữa các cột trong file csv (xem ở Notepad) thành khoảng trắng (tab) để giúp nhìn các cột rõ hơn như sau.

## import file csv

file_example_1 <- read.csv("file_example_1.csv", sep = ",")

library(crimeutils) # package giúp add trailing zeros

## convert từng cột trong matrix để đủ zeros sau dấu thập phân

apply(X = file_example_1, MARGIN = 2, FUN = pad_decimals) -> yes_1

## xử lý cột đầu tiên để digits = 0

crimeutils::pad_decimals(as.numeric(yes_1[, 1]), digits = 0) -> yes_1[, 1]

## export ra file tsv với 2 tab

write.table(x = yes_1, file = "file_example_1.tsv", row.names = FALSE, sep = "\t\t", quote = FALSE)

Lúc này bạn có thể upload file tsv hay txt lên website để thuận tiện thể hiện full dataset. Link