停止回音\r\n

我有一个包含随机文本的文件。我叫它text.txt

我使用了以下代码：

readfile <- read_file("text.txt")

我得到的结果如下所示：

\r\r\n random sentence. Blah blah blah.
Blah blah \r\r\n blah blah. \r\r\n blah.

这可能是由于间隔造成的。双重\r对我造成问题，我不知道如何删除重复的\r。我想知道是否有办法删除一个\r\n， 所以基本上：

\r\n random sentence. Blah blah blah.
Blah blah \r\n blah blah. \r\n blah.

---

您应该能够使用

gsub

和正则表达式来实现这一点

Text = "\r\r\n random sentence. Blah blah blah.
Blah blah \r\r\n blah blah. \r\r\n blah."

Text2 = gsub("\r\r+", "\r", Text)

Text2
[1] "\r\n random sentence. Blah blah blah.\nBlah blah \r\n blah blah. \r\n blah."
cat(Text2)
  random sentence. Blah blah blah.
Blah blah   blah blah.   blah.

---

我使用了“\r\r+”，因此它也将涵盖连续两个以上\r的情况

您应该能够使用

gsub

和正则表达式来实现这一点

Text = "\r\r\n random sentence. Blah blah blah.
Blah blah \r\r\n blah blah. \r\r\n blah."

Text2 = gsub("\r\r+", "\r", Text)

Text2
[1] "\r\n random sentence. Blah blah blah.\nBlah blah \r\n blah blah. \r\n blah."
cat(Text2)
  random sentence. Blah blah blah.
Blah blah   blah blah.   blah.

我使用了“\r\r+”，因此它也将涵盖连续两个以上\r的情况