Comando R para configurar el directorio de trabajo a la ubicación del archivo fuente en Rstudio

Estoy elaborando algunos tutoriales en R. Cada código R está contenido en una carpeta específica. Hay archivos de datos y otros archivos allí. Quiero abrir el.r Archivo y fuente de tal manera que no tenga que cambiar el directorio de trabajo en Rstudio como se muestra a continuación:

¿Hay una manera de especificar mi directorio de trabajo automáticamente en R.