R语言：读入txt文件中文文本出现乱码解决方案

下载安装 readr

因为使用内置函数 read.table() 读入应该是格式不符合要求会报错

library(readr)
help(package="readr")

可以使用里面的 read_table()，下面来检测一下

library(dplyr)
read.table('E:\forpython\chapters\chap1.txt') %>% head()
read_table('E:\forpython\chapters\chap1.txt') %>% head()

> read.table('E:\forpython\chapters\chap1.txt') %>% head()
Error in scan(file = file, what = what, sep = sep, quote = quote, dec = dec,  : 
  line 1 did not have 2 elements
> read_table('E:\forpython\chapters\chap1.txt') %>% head()
Parsed with column specification:
cols(
  `第一回  甄士隐梦幻识通灵　贾雨村风尘怀闺秀` = col_character()
)
# A tibble: 6 x 1
                                                                                                                                                        `第一回  甄士隐梦幻识通灵　贾雨村风尘怀闺秀`
                                                                                                                                                                                               <chr>
1                                                                                             列位看官：你道此书从何而来？说起根由，虽近荒唐，细按则深有趣味。待在下将此来历注明，方使阅者了然不惑