対話的にcsvファイルを読み込む方法

R 
x <- read.csv(file.choose(), header=T)

他の人に作業を頼むときにはいいかも。