Executar um script bash de um script R

Então eu tenho este programa samtools que eu quero usar da linha cmd, convertendo um arquivo para outro. Funciona assim:

bash-4.2$ samtools view filename.bam | awk '{OFS="\t"; print ">"$1"\n"$10}' - > filename.fasta

Como eu quero automatizar isso, eu gostaria de automatizá-lo usando um script R. Eu sei que você pode usar o sistema () para executar um comando do sistema operacional, mas não posso fazê-lo funcionar tentando

system(samtools view filename.bam | awk '{OFS="\t"; print ">"$1"\n"$10}' - > filename.fasta)

É apenas uma questão de usar regexes para se livrar de espaços e coisas para que o sistema de argumentos e comandos (comando) seja legível? Como eu faço isso?

EDITAR:

system ("samtools view nome_do_arquivo.bam | awk '{OFS =" \ t "; print"> "$ 1" \ n "$ 10}' -> first_batch_1.fasta") Erro: entrada inesperada em "system (" samtools view filename .bam | awk '{OFS = "\"

EDIT2:

system ("samtools view nome_do_arquivo.bam | awk '{OFS = \" \ t \ "; print \"> \ "$ 1 \" \ n \ "$ 10}' -> nome_do_arquivo.fasta")

awk: cmd. line:1: {OFS="    "; print ">"$1"
awk: cmd. line:1:                         ^ unterminated string
awk: cmd. line:1: {OFS="    "; print ">"$1"
awk: cmd. line:1:                         ^ syntax error
> 

EDIT3: E o vencedor é:

system("samtools view filename.bam | awk '{OFS=\"\\t\"; print \">\"$1\"\\n\"$10}' -> filename.fasta")

questionAnswers(1)

yourAnswerToTheQuestion