Bash commands in R

x<-as.matrix(read.table(pipe("awk -f cut.awk F120x1")))