我正在研究R中的一些教程.每个R代码都包含在一个特定的文件夹中.那里有数据文件和其他文件.我想打开.r文件并获取它,这样我就不必更改Rstudio中的工作目录,如下所示:

有没有办法在R中自动指定我的工作目录
我写一个类而不是扩展SplFileObject来打开一个CSV并具有一个关联数组.它是有效的,但如果csv文件使用CR换行符则不行.
我知道你可以像这样转换字符串换行符:
$string = str_replace($this::CRLF, $string::LF, $file);
$string = str_replace($this::CR, $string::LF, $file);
Run Code Online (Sandbox Code Playgroud)
但我想知道如何在构造函数中转换换行符.
我如何创建我的文件:
$file = new CSVFile(__DIR__ . '/../../Resources/data/myfile.csv');
Run Code Online (Sandbox Code Playgroud)
类CSVFile.php
use \SplFileObject;
class CSVFile extends SplFileObject
{
private $keys;
public function __construct($file)
{
parent::__construct($file);
$this->setFlags(SplFileObject::READ_CSV);
}
public function rewind()
{
parent::rewind();
$this->keys = parent::current();
parent::next();
}
public function current()
{
return array_combine($this->keys, parent::current());
}
public function getKeys()
{
return $this->keys;
}
Run Code Online (Sandbox Code Playgroud)
}