2

Eu tenho uma máquina virtual com muitos arquivos TXT. Eu costumo usar uma conexão ssh e pipe para poder ler os arquivos. Quando eu uso a funcao read.csv não há problema nenhum na hora de ler os arquivos. Já quando eu uso a função fread, o negócio não dá certo. Mostro primeiro o caso que dá certo!

 # my directory with the plink intallation (plink.exe)
 dir<- "C/Tools/Terminal/"
 setwd(dir)

 user <- 'XXXXXX'
 password <- 'XXXX'
 dir_file_machine <- '/media/projects/'
 name_file <- 'XXXXXX.TXT'
 capture_file <- pipe(paste0('plink -ssh ', 
                              user, 
                              '@123.45.678.901 -P 12 -pw ', #fictice 
                              password, 
                              ' "cat ', 
                              dir_file_machine, 
                              name_file))

 a <- read.csv(capture_file, sep = ";")

Agora, quando eu uso a função fread acontece o seguinte erro...

 capture_file <- pipe(paste0('plink -ssh ', 
                              user, 
                              '@123.45.678.901 -P 12 -pw ', #fictional 
                              password, 
                              ' "cat ', 
                              dir_file_machine, 
                              name_file))

 a <- fread(capture_file, sep = ";")
 Error in fread(capture_file) : 
'input' must be a single character string containing a file name, a command, full path to a file, a URL starting 'http[s]://', 'ftp[s]://' or 'file://', or the input data itself

Alguma ideia?

6
  • 1
    A função read.csv aceita conexões como um dos inputs. Já a fread, não... Acredito que não exista um jeito fácil para corrigir isso. Commented 29/07/2016 às 16:43
  • 2
    De acordo com o comentário aqui e a documentação, você pode passar o comando direto para o fread, sem o pipe. Não tenho como testar aqui, mas em princípio deveria funcionar removendo o pipe apenas.
    – Molx
    Commented 30/07/2016 às 17:12
  • @Molx interessante!! Retiro o meu comentário :P Commented 2/08/2016 às 1:04
  • 1
    Sim, funciona. Obrigado
    – MAOC
    Commented 2/08/2016 às 1:06
  • 2
    @Molx seria legal você colocar seu comentário como resposta, não acha? Commented 9/08/2016 às 0:37

1 Resposta 1

2

Na realidade para fazer isto basta remover o pipe, pois o próprio fread já faz o piping do comando:

capture_file <- paste0('plink -ssh ', 
                       user, 
                       '@123.45.678.901 -P 12 -pw ', #fictional 
                       password, 
                       ' "cat ', 
                       dir_file_machine, 
                       name_file)
a <- fread(capture_file, sep = ";")

Note que isto está na documentação do fread:

input

Either the file name to read (containing no \n character), a shell command that preprocesses the file (e.g. fread("grep blah filename") or the input itself as a string (containing at least one \n), see examples. I

Fonte.

Você deve fazer log-in para responder a esta pergunta.

Esta não é a resposta que você está procurando? Pesquise outras perguntas com a tag .