У меня есть файл DAT размером> 5 ГБ и содержит> 41 миллион строк. Чтобы сделать его исполняемым в определенном программном обеспечении, мне, конечно, нужно преобразовать его в CSV-файл с помощью некоторых манипуляций перед его печатью. Из-за размера невозможно сделать это хорошо в MS Excel. Поэтому я предпочитаю использовать RStudio в конце.
Я уже пробовал, просто кодируя в пространстве Rmd, и добился успеха. Но у моих коллег такая же проблема, поэтому я инициировал развертывание кода в Shiny, чтобы они не устанавливали R и RStudio, а просто получали доступ к определенному блестящему приложению, которое я должен был создать.
это коды, которые полностью работали. Я просто положил их в Rmd.
data <- read.table("xxx.dat")
uniq <- unique(data[,3])
df <- data.frame(uniq)
library(stringr)
data$V9 <- str_replace_all(data$V8,"-","0")
uniq <- as.character(uniq)
for(i in 1:nrow(df)){
aa <- ifelse(nchar(uniq[i])==7,paste(substr(uniq[i],1,4),substr(uniq[i],6,7),sep=""),paste(substr(uniq[i],1,5),substr(uniq[i],7,8),sep=""))
write.table(data.frame(filter(data,V3==df[i,1]))[,c(6,7,9)],sprintf('%s.csv',aa),row.names=FALSE,col.names=FALSE,sep=",")
}
я ожидал создать его в Shiny, чтобы мои друзья могли использовать его без установки R и RStudio. На блестящей странице я просто хотел поставить 3 части;
- ActionButton для просмотра файла, который я хочу преобразовать (включая имя файла)
- ActionButton для поиска места назначения. Я бы поместил преобразованный файл (каталог)
- ActionButton для его преобразования
Кто-нибудь может мне помочь, пожалуйста