Как исправить ошибку в файле (file, "rt"): не удается открыть соединение - PullRequest
Новая
       81

Как исправить ошибку в файле (file, "rt"): не удается открыть соединение

0 голосов
/ 06 апреля 2020

В этом коде я попытался использовать для l oop для значений id и некоторых операторов if if else, потому что файлы были в "001.csv", форме и "010" форме, поэтому я создал этот код. План состоял в том, чтобы сохранить вектор символов и затем прочитать его, используя read.csv.

. Я использовал функцию getwd(), чтобы получить рабочий каталог, а затем setwd, чтобы установить его как тот же каталог, но он все еще не не работает Таким образом, в основном разбив l oop на 1 и 10, я попытался сформировать эту функцию, основная проблема заключается в чтении этого файла. 

Error in file(file, "rt") : cannot open the connection

- это то, что он показывает мне. Я использую Windows 10 и Rstudio. 

pollutmean <- function(pollutant="sulfate", id=1:332) {
  for (i in id) {
    if (i < 10) {
      x <- i
      char <- as.character(x)
      a <- paste("C:/Users/ksart/Desktop/Specdata/Specdata/00", char, ".csv",
                 sep="")  # this is where i m trying to read in the values
      temp1 <- read.csv(a)
      data_1 <- rbind.data.frame(data_1, temp1)
      data_1
    }      
    else if (10 <= i && i < 100 ) {  # for 10s files
      y <- i
      char1 <- as.character(y)
      b <- paste("C:/Users/ksart/Desktop/Specdata/Specdata/0", char1, ".csv",
                 sep="")
...