如何修复错误“关闭未使用的连接”

Question

要阅读Test.csv的前5列，我可以去：

x <- matrix(scan(pipe(paste0("cut -f1,2,3,4,5 -d, ","/home/test/Test.csv")),skip=1,sep=","),ncol=5)

然后，如果我使用普通方法阅读它：

y <- read.csv("/home/test/Test.csv")

我收到错误消息：

Warning message:
closing unused connection 3 (cut -f1,2,3,4,5 -d, /home/test/Test.csv)

此错误消息是否有问题，如果是，我该如何解决？

Answer 1

我无法在我的系统上复制警告。但是，您可以尝试显式关闭连接：

con <- pipe(paste0("cut -f1,2,3,4,5 -d, ","/home/test/Test.csv"))
x <- matrix(scan(con,skip=1,sep=","),ncol=5)
close(con)