Erreur dans le fichier(fichier, “rt”) : impossible d'ouvrir la connexion ne peut pas ouvrir un fichier "specdata" accès refusé

Je suis en cours d'exécution rStudio v3.1.2 sur Windows 7. Ce portable est une machine 64 bits.

Je prends le JHU R cours de Programmation offerts par Coursera et je suis bloqué sur une erreur que je reçois dans la partie 1 de ce problème. J'ai quelques fonctions de gestion d'erreur, je vais garder hors de cet exemple, donc je suis vraiment juste essayer de montrer ce que j'ai absolument besoin de. La seule raison pour laquelle je inclure des messages est la preuve que toutes les conditions doivent être satisfaites dans l'ordre de procéder.

  pollutantmean <- function(directory, pollutant, id=1:332) {

  setwd("C:\\Users\\WR-eSUB\\specdata")

  if(!isValidDirectory(directory)) {
        stop("Invalid input given.  Please specify valid directory to operate on.")
  }
  if(!isValidPollutant(pollutant)) {
        stop("Invalid input given.  Please specify valid pollutant (nitrate/sulfate).")
  }
  if(!isValidIdRange(id)) {
        stop("Invalid input given.  Please specify valid id range (1:332).")
  }
  sortedData = numeric()
  for (i in id) {
        thisFileName = paste(formatC(i, width = 3, flag = "0"), ".csv", sep="")
        thisFileRead = read.csv(directory, thisFileName)
        sortedData = c(sortedData, thisFileRead[[pollutant]])
  }
  mean(sortedData, na.rm = TRUE)
}

Remarque qu'à l'intérieur de WR-demande électronique (gde) est un dossier appelé specdata et à l'intérieur de que dossier, il y est le répertoire qui contient le .les fichiers csv également appelé specdata. Je pourrais changer cela, mais jusqu'à présent, j'ai travaillé avec elle et je n'ai pas rencontré de problèmes.

Quand je l'appelle pollutantmean("specdata", "nitrate", 1:2) je reçois le message d'erreur suivant:

 Error in file(file, "rt") : cannot open the connection 
 In addition: Warning message: In file(file, "rt") : cannot open file 'specdata': Permission denied

Maintenant dans mes nombreuses tentatives pour essayer de le terminer cette partie de la mission, j'ai été en mesure d'extraire les données d'une autre façon en utilisant des choses comme lapply mais parce que j'ai continué à obtenir coincé, j'ai jeté tout ce qui sort et je voulais tenter les choses de cette façon.

J'ai cherché sur le web pour essayer de trouver cette solution. Malgré le fait qu'il ya plusieurs répond aux demandes de renseignements aucune d'entre elles semblent être tout à fait aussi déroutant que celui-ci est. WR-demande électronique (gde) est un dossier administratif, mais les précédentes tentatives pour ouvrir les fichiers qu'il contient n'ont pas produit cette erreur avant.

Donc, il est C:/Users/WR-eSUB/specdata/specdata/*.csv?
Je suis désolé si ma question ne semble pas clair ou si j'ai l'air léthargique en aucune façon. Pour être complètement honnête, je suis vraiment au bout du rouleau et si vous allez en bas de vote-moi au moins le faire en expliquant pourquoi je ne vais pas le faire à nouveau.
Qu'est-ce que la sortie de list.files("C:\\Users\\WR-eSUB\\specdata")?
"specdata" est la réponse. C'est tout. Je sais c'est redondant, mais il a travaillé très bien pour moi dans mes autres implémentations je n'ai donc jamais eu l'occasion de le changer. Si vous pensez que c'est nécessaire, je vais le faire mais j'ai vraiment attrapé données utilisables simplement laisser comme il est.

OriginalL'auteur ASwiftPeregrine | 2015-02-19