setwd for external issueanalysis

issuecomp-2-analysis-EXT.R

@@ -5,7 +5,7 @@ require(foreach)
 require(doParallel)
 
 source("issuecomp-functions.R")
-setwd("~/Dokumente/Uni/Aktuell/BA-Arbeit/uni-ba-issuecomp")
+setwd("E:/max.mehl")
 
 
 load(file = "tweets_untagged.RData")
@@ -99,8 +99,8 @@ foreach(d = 1:nrow(issues), .packages = c("stringr"), .combine=rbind) %dopar% {
         }
         
         # Match current tweet with tag. 
-          # Allow 1 Levenshtein distance if tag is >= 5 letters and no hashtag or acronym
-          # Make is case-sensitiv if tag is an acronym
+        # Allow 1 Levenshtein distance if tag is >= 5 letters and no hashtag or acronym
+        # Make is case-sensitiv if tag is an acronym
         
         tags_found <- NULL
         # Match the tweet with each variation of tagexpand