R语言导入其他统计软件文件

偏执的太偏执、 2023-07-23 05:00 20阅读 0赞

使用R中的**foreign包**可以较方便地读取其他统计软件的数据文件，比如SPSS、SAS等数据文件等

<table> 
 <thead> 
  <tr> 
   <th>函数</th> 
   <th>描述</th> 
  </tr> 
 </thead> 
 <tbody> 
  <tr> 
   <td>read.arff</td> 
   <td>从ARFF文件中读取文件，著名的数据挖掘开源软件weka的数据就是这种格式</td> 
  </tr> 
  <tr> 
   <td>read.dbf</td> 
   <td>读取DBF文件，DBF文件就是数据库文件</td> 
  </tr> 
  <tr> 
   <td>read.dta</td> 
   <td>读取Stata中的数据集</td> 
  </tr> 
  <tr> 
   <td>read.epiinfo</td> 
   <td>读取Epi Info的数据集</td> 
  </tr> 
  <tr> 
   <td>read.mtp</td> 
   <td>读取Minitab中的数据集</td> 
  </tr> 
  <tr> 
   <td>read.octave</td> 
   <td>读取Octave的文本数据</td> 
  </tr> 
  <tr> 
   <td><font>read.spss</font></td> 
   <td><font>读取SPSS的数据文件</font></td> 
  </tr> 
  <tr> 
   <td><font>read.ssd</font></td> 
   <td><font>读取SAS的永久数据集</font></td> 
  </tr> 
  <tr> 
   <td>read.systat</td> 
   <td>读取systat格式的数据</td> 
  </tr> 
 </tbody> 
</table>

--------------------

# 导入其他统计软件文件-foreign包 #

**foreign包**中常用读取其他格式文件的函数

<table> 
 <thead> 
  <tr> 
   <th align="left">统计软件</th> 
   <th align="left">读取数据的函数格式</th> 
  </tr> 
 </thead> 
 <tbody> 
  <tr> 
   <td align="left">SPSS</td> 
   <td align="left">read.spss(file,to.data.frame=TRUE</td> 
  </tr> 
  <tr> 
   <td align="left">SAS</td> 
   <td align="left">read.ssd(libname,sectionnames,tmpXport=tempfile(),tmpProgLoc=tempfile(),sascmd=“sas”)</td> 
  </tr> 
  <tr> 
   <td align="left">Minitab</td> 
   <td align="left">read.mtp(file)</td> 
  </tr> 
  <tr> 
   <td align="left">STATA</td> 
   <td align="left">read.dta(file,convert.dates=TRUE,convert.factors=TRUE,missing.type=FALSE,convert.underscore=FALSE,warm.missing,labels=TRUE</td> 
  </tr> 
  <tr> 
   <td align="left">SYSTAT</td> 
   <td align="left">read.systat(file,to.data.frame=TRUE)</td> 
  </tr> 
 </tbody> 
</table>

--------------------

# 导入SPSS软件文件 #

通过foreign包中的read.spss()函数导入到R中

▲使用**Hmisc包**中的**spss.get()**函数导入

![在这里插入图片描述][watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_0_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3FxXzQzMTMzMTky_size_1_color_FFFFFF_t_70]

**程序示例：**

install.packages("Hmisc")
    library(Hmisc)
    test<-spss.get("test.sav",use.value.labels = TRUE) #use.value.labels=TRUE表示让函数将带有值标签的变量导入为R中水平对应相同的因子
    View(test)

--------------------

# 导入SAS软件文件 #

通过foreign包中的read.ssd()函数导入到R中

*  R对于SAS的较新版本支持的不好
 *  解决办法：在SAS中使用PROC EXPORT将SAS数据集保存为一个逗号分隔的文本文件，然后将导出的文件读取到R中

![在这里插入图片描述][watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_0_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3FxXzQzMTMzMTky_size_1_color_FFFFFF_t_70 1]

**SAS程序：**

proc export data=mydata
    outfile="mydata.csv"
    dbms=csv
    run;

**R语言：**

`mydata<-read.table("mydata.csv",header=TRUE,sep=",")`

[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_0_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3FxXzQzMTMzMTky_size_1_color_FFFFFF_t_70]: /images/20230528/82532ac266534c0399d7f6830d718961.png
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_0_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L3FxXzQzMTMzMTky_size_1_color_FFFFFF_t_70 1]: /images/20230528/1da45b082e9b4a3db03bbd607b8e01b3.png