如何在R中使用sink()函数

教程

您可以在R中使用sink()函数将数据传送到外部连接。

大家好，今天我们将研究一下R中sink()函数的应用。我们将尝试建立多种格式的连接，例如文本和csv文件类型。

使用sink()函数，您可以打印数据，也可以将数据或R输出导出为文本或CSV文件类型。

让我们看看它是如何工作的！

在R中sink()函数的语法

Sink()： sink函数用于将R中获得的输出传送到外部连接。

sink(file = NULL, type = c("output", "message"),split = FALSE)

其中：

File = 可编辑的连接或文件类型。
Append = 用于将数据追加到文件以避免覆盖的逻辑函数。
Split = 输出将被重定向到新连接或链接。

1. 设置工作目录

通过sink()函数的帮助，您可以轻松地将输出打印到文本文件中作为连接。我们可以通过设置工作目录来开始此过程。

要检查当前工作目录：

#返回当前工作目录
getwd()

"C:/Users/Dell/Desktop/rfiles"

好的。现在我们知道了工作目录。您也可以使用以下方法更改工作目录：

#设置新的工作目录
setwd("The directory path here")

将路径粘贴到setwd()函数中以设置新的工作目录。之后不要忘记使用上面所示的‘getwd()’命令确认更改。

2. 将数据打印到文本文件中

I hope you are ready with your working path now. Now we are going to create a file connection and print some data into it.

让我们看看它是如何工作的。

#将数据沉入连接作为文本文件
sink("my_first_sink.txt")

#打印从1到20的数字
for (i in 1:20)
print(i)
sink()

现在您可以看到我们的R数据被整齐地打印到文本文件中。很棒，对吧？

3. 将数据导出到文本文件中

在前面的部分，我们已经将数据或输出打印到文本文件中。在本节中，我们将导出R默认情况下可用的整个数据集。

让我们看看它是如何工作的。

#将数据导出为文本文件
sink('export_dataframe.txt')
airquality
sink()

您可以看到空气质量数据集的数据被驱动到文本文件中作为外部连接。

这是您如何轻松将数据从R导出到连接的方式。您还可以按照下面的示例导出为CSV文件。

4. 将数据框导出为CSV文件

在本节中，我们将使用R中的sink()函数将数据驱动或导出到CSV文件。让我们看看它是如何工作的。

#将数据导出为csv文件
sink('export_dataframe_1.csv')
iris
sink()

嗯，这是一个包含从R控制台导出的数据的CSV文件。在R中，sink()函数提供了将数据轻松驱动到外部连接（如文件）的最简单方法。

将数据摘要导出到连接

到目前为止，一切顺利。现在，让我们尝试将以上部分学到或理解的内容综合起来。

问题陈述很简单。

=> 读取您选择的数据集，并使用函数summary()获取数据的摘要。在这样做之后，将结果导入文本文件作为连接。

让我们开始吧！！！

1. 让我们读取数据

#读取数据
df<-datasets::airquality
df
View(df)

问题陈述的第一步就在这里。您可以在上图中看到空气质量数据集。

2. 数据的summary()

使用函数summary()的数据摘要如下所示。

#返回数据的关键见解
summary(airquality)

  Ozone           Solar.R           Wind             Temp           Month      
 Min.   :  1.00   Min.   :  7.0   Min.   : 1.700   Min.   :56.00   Min.   :5.000  
 1st Qu.: 18.00   1st Qu.:115.8   1st Qu.: 7.400   1st Qu.:72.00   1st Qu.:6.000  
 Median : 31.50   Median :205.0   Median : 9.700   Median :79.00   Median :7.000  
 Mean   : 42.13   Mean   :185.9   Mean   : 9.958   Mean   :77.88   Mean   :6.993  
 3rd Qu.: 63.25   3rd Qu.:258.8   3rd Qu.:11.500   3rd Qu.:85.00   3rd Qu.:8.000  
 Max.   :168.00   Max.   :334.0   Max.   :20.700   Max.   :97.00   Max.   :9.000  
 NA's   :37       NA's   :7                                                       
      Day      
 Min.   : 1.0  
 1st Qu.: 8.0  
 Median :16.0  
 Mean   :15.8  
 3rd Qu.:23.0  
 Max.   :31.0

这是显示最小值和最大值、四分位数、中位数、平均值等更多见解的数据摘要。

3. 将输出驱动到连接

现在，您只需要将其导出到文本文件并将其作为外部连接即可。

#将输出数据驱动到txt文件
sink('problem-solution.txt')
summary(airquality)
sink()

4. 结束连接

您已经正确完成了所有步骤，并成功将数据驱动到文本文件作为外部连接。

现在是时候结束连接了。

#终止连接
unlink('problem-solution.txt')

上述命令将删除文件连接。

总结所有步骤，

在R控制台中读取数据。
对数据应用summary()函数。
获取数据的关键见解。
使用R中的sink()函数将发现驱动到文本文件中。

总结

水槽（sink()）函数在R中将R输出驱动到外部连接。您可以将数据导出为文本和CSV文件等多种形式。您可以将数据打印到连接中，也可以直接将整个数据导出到连接中。

数据传输后，您可以取消连接以终止文件。

R中的sink()函数在许多方面都很有用，因为它提供了临时连接以处理数据。