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

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)