R语言如何实现数据输入

这篇文章将为大家详细讲解有关R语言如何实现数据输入，小编觉得挺实用的，因此分享给大家做个参考，希望大家阅读完这篇文章后可以有所收获。

首先，数据输入最直接最直观的方法就是键盘输入，在上面几篇都已经讲到，利用c创建向量，利用matrix创建矩阵，利用data.frame创建数据框等，但是我们处理的数据往往比较多，键盘输入在面对如此庞大的数据时显然不现实，当然你可以花费好几天来输入数据而且保证不出错除外，而且待处理的一般都存储在excel，网页，数据库其他中介中，因此：如何大批量无差错高效率地读取数据就成为R语言首先要解决的问题。

第一：如果自己学习写代码，加载R语言中本身自带的数据包cars等，加载的方法跟其他包相同，具体代码如下：

> install.packages("car")> library(cars)

第二:读取外部数据一般用read.***( )，***代表要读取的文件类型，下面详细解释了每种类型的文件的读取：

read.table(file, header = FALSE, sep = "", quote = "\"'",      dec = ".", numerals = c("allow.loss", "warn.loss", "no.loss"),      row.names, col.names, as.is = !stringsAsFactors,      na.strings = "NA", colClasses = NA, nrows = -1,      skip = 0, check.names = TRUE, fill = !blank.lines.skip,      strip.white = FALSE, blank.lines.skip = TRUE,      comment.char = "#",      allowEscapes = FALSE, flush = FALSE,      stringsAsFactors = default.stringsAsFactors(),      fileEncoding = "", encoding = "unknown", text, skipNul = FALSE)read.csv(file, header = TRUE, sep = ",", quote = "\"",     dec = ".", fill = TRUE, comment.char = "", ...)read.csv2(file, header = TRUE, sep = ";", quote = "\"",     dec = ",", fill = TRUE, comment.char = "", ...)read.delim(file, header = TRUE, sep = "\t", quote = "\"",      dec = ".", fill = TRUE, comment.char = "", ...)read.delim2(file, header = TRUE, sep = "\t", quote = "\"",      dec = ",", fill = TRUE, comment.char = "", ...)

其中：

参数file：代表要读去的文件名以及文件路径，如果当前工作路径就是需要读取的文件的存储路径，那么可以直接写文件名，记得要用双引号括起来。那么如何设置工作路径呢？首先我们查看当前的工作路径用getwd( )函数，设置工作路径的话用setwd(" 工作路径")函数，注意，在设置工作路径时，需要把路径中所有的 "\" 改成 “\\”。具体操作如下代码：

> getwd()  #查看当前工作路径[1] "E:/赵志博/R"> setwd("E:\赵志博") #错误的设置方式Error: '\? is an unrecognized escape in character string starting ""E:\?> setwd("E:\\赵志博") #正确的设置方式> getwd()  #查看设置后的工作路径[1] "E:/赵志博"

当工作路径设置完成后，便可以直接读取工作路径里面的文件而不需要加文件的存储位置。如代码所示，当前工作路径为"E:/赵志博"，在该路径下创建了文件“123.txt”，可以直接读取文件，但是在“D:/”创建了新的文件“456.txt”，便不能直接读取，需要加上完整的文件路径，路径同样需要将"\" 改成 “\\”。

mydata <- read.table("123.txt",sep = ',')> mydata V1 V2 V31 1 2 32 4 5 63 7 8 9> mydataD <- read.table("456.txt",sep = ',')Error in file(file, "rt") : cannot open the connectionIn addition: Warning message:In file(file, "rt") : cannot open file '456.txt': No such file or directory> mydataD <- read.table("D:\\456.txt",sep = ',')> mydataD V1 V2 V31 1 2 32 4 5 63 7 8 9

每次都要设置路径，对有些场合来说未免太过麻烦，因此R提供了一种可以直接选择文件位置的函数，read.***(file.choose()),例如读取txt数据：

mydatachoose <- read.table(file.choose()) #自由选取数据来读取，但是file.choose( )的参数好像没有

参数header：主要确定需要读取的文件是否自己已经设置了列名，默认值为FALSE。这个需要解释一下：上节我们已经讲过data.frame类型，那么read.***( )的返回值也是数据框类型，自然是按列填充的数据框格式，因此列名就显得尤为重要，相当于Excel的表头部分，行号系统会根据1~N的顺序排好，当然也可以修改。

参数sep：主要确定需要读取的文件中，各个字符的分割方式，一般有空格分割，逗号分割等，确定了分割方式，才能保证将数据读取为自己想要的样子。

常见用的参数就是这些，其他的原理都差不多，如果有需要自行学习。

txt文件：mydata <- read.table( )

Excel格式数据：mydata <- read.xlsx( ),在使用这个函数之前，需要先安装xlsx包，安装方法跟其他包的安装方法一致。一般来说，读取xlsx文件速度较慢，通常将Excel文件保存为csv格式，然后再进行读取 mydata <- read.csv( )

XML数据：读取XML数据前先要载入XML包，然后使用 mydata <- xmlRoot(xmlTreeParse("***.xml"))来读取

关于“R语言如何实现数据输入”这篇文章就分享到这里了，希望以上内容可以对大家有一定的帮助，使各位可以学到更多知识，如果觉得文章不错，请把它分享出去让更多的人看到。