Rstudioでソースのあるディレクトリに移動する方法

Rstuidoを使っている人限定：

setwd(dirname(rstudioapi::getActiveDocumentContext()$path))

参考文献

stackoverflow.com