Rスクリプト間で値を渡す方法

Question

xlsスプレッドシートを取り、それをクリーンアップして分析を行うRスクリプトがあります。分析が、クリーンアップが常に同じであるんとしてソーススプレッドシートの変更はので、私は、私は 1. XLSファイル 2.を読み取り、書き込み、新しいスクリプトで次の操作を実行したいと思います

があることをXLSファイルを送りますクリーンアップスクリプトでデータフレームにクリーンアップします 3.クリーンアップされたデータフレームを元のスクリプトに送り返してさらに分析します

クリーンアップスクリプトからデータフレームを取得して使用することができますソースを使用します。私は理解していないことは、最初の場所でクリーンアップスクリプトに元のファイルを送信する方法である：

は、私は、コマンドライン引数を経てこれをしなければならないし、引数としてファイルの上送信ください。

cleanUp <- function(file) { 
    library(openxlsx) 
    MyData<-read.xlsx(file, sheet = 1, startRow = 1, colNames = TRUE) 
    MyData$Dx<-gsub("[Nn]o .*?\n","",MyData$Dx) 
    MyData$Dx<-gsub("[Nn]ormal.*\n","",MyData$Dx) 
    return(MyData) 
} 

出典：もしそうなら、どのように私はまた、受信CleanUp.R

そして、ここでファイルを指定してくださいCleanUp.Rスクリプトは、あなたが簡単に機能にこれを回すことができる

library(ggplot2) 
library(gtools) 
library(openxlsx) 

MyData<-read.xlsx("/Users/sebastianzeki/Reports.xlsx", sheet = 1, startRow = 1, colNames = TRUE) 
MyData$Dx<-gsub("[Nn]o .*?\n","",MyData$Dx) 
MyData$Dx<-gsub("[Nn]ormal.*\n","",MyData$Dx) 

Answer 1

ですあなたのスクリプト（またはパッケージにパッケージングしてパッケージをロード）を実行し、次に実行します：

df <- cleanUp("/Users/sebastianzeki/Reports.xlsx") 

編集：関数内にggplot2またはgtoolsが必要ないはずがないと思いますので、削除しました。あなたがそこにそれらを必要とするなら、それらを戻す。