Как сохранить специальные символы в CSV при сохранении их для Excel?

Question

Давайте рассмотрим это простое создание файла CSV с фреймом данных, который содержит специальные символы:

d <- data.frame(x = "Édifice", y="Arrêt")
write.table(x = d, file = "test.csv", sep = ",", row.names = F, col.names = F, quote = F, fileEncoding = "UTF-8")

Файл CSV выглядит так, как ожидалось

Édifice,Arrêt

Но когда я открываю этот CSV В Excel я получаю:

Я попытался использовать readr, свернуть столбцы, а затем записать их с writeLines, запись с использованием write.xlsx, проверено на кодирование опции. Ничего не сработало.

Мое ограничение заключается в том, что входные данные являются кадрами данных, а выходные данные должны быть в формате csv для чтения в Excel.

Answer 1

Та же проблема с немецким умляутом. Я использую write_excel_csv от readr:

library(readr)
write_excel_csv(x = d, path = "test.csv", col_names = F)