Browse Source

Edit: fix issue with cbind() not being able to include the mode() of fdat

janwey 1 year ago
parent
commit
86d3cd98ad
1 changed files with 2 additions and 0 deletions
  1. 2
    0
      collecto.R

+ 2
- 0
collecto.R View File

@@ -144,6 +144,7 @@ time <- gsub(pattern = ":", x = time, replace = "")
144 144
 date <- sub(pattern = " .*", x = twitter_timedate, replace = "")
145 145
 date <- gsub(pattern = "-", x = date, replace = "")
146 146
 fdat <- strptime(x = paste0(date, time), format = "%Y%m%d%H%M%S", tz = "CET")
147
+fdat <- as.character(fdat)
147 148
 retw <- as.factor(twitter_rts)
148 149
 favs <- as.factor(twitter_fav)
149 150
 link <- as.character(twitter_url)
@@ -318,6 +319,7 @@ time <- sub(pattern = "\\..*", x = time, replacement = "")
318 319
 time <- gsub(pattern = ":", x = time, replacement = "")
319 320
 #### full time
320 321
 fdat <- strptime(x = paste0(date, time), format = "%Y%m%d%H%M%S", tz = "CET")
322
+fdat <- as.character(fdat)
321 323
 
322 324
 ### Removing HTML-Tags from Toots
323 325
 text <- gsub(pattern = "<.*?>", x = text, replacement = "")

Loading…
Cancel
Save