r - 在 R 中使用 diffObj 时显示新行(不是新行字符)？

Question

install.packages("diffobj")
library(diffobj)


first_string <- "It's
a
nice
day"

second_string <- "it's
a
nice
day"

产生



我们如何产生相同的输出但屏幕上显示实际的新行(而不是 \n )

注: diffObj()有一个 pager="off"选项将只显示 HTML(文本)输出，而不是在 RStudio 的查看器 Pane 中呈现它。这可能是一个有用的开始。

Answer 1

您可以使用 diffFile 方法...

# Load package
library(diffobj)

# Define strings
first_string <- ("It's
a
nice
day")

second_string <- ("it's
a
nice
day")

# Write them out to temporary locations.
first_string_output <- file.path(tempdir(), "first_string_output")
second_string_output <- file.path(tempdir(), "second_string_output")

write.table(first_string, file = first_string_output, col.names = F, row.names = F, quote = F)
write.table(second_string, file = second_string_output, col.names = F, row.names = F, quote = F)

# DiffFile them
diffFile(first_string_output, second_string_output)