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