My tweets
This is my first app in R. Just a visualization of my tweets over time:
![tweets](/_next/image?url=%2F_next%2Fstatic%2Fmedia%2Ftweets.de6014d7.png&w=3840&q=75)
The language itself seems powerful. I wish I could have more real-life tasks to practice with R.
tweets <- read.csv(file="tweets.csv",
head=TRUE,
sep=",",
colClasses=c("NULL","NULL","NULL",NA,"NULL","NULL","NULL"))
tweets$date <- as.Date(substr(tweets$timestamp, 0, 10))
tweets$hours <- as.integer(substr(tweets$timestamp, 12, 13))
tweets$minutes <- as.integer(substr(tweets$timestamp, 15, 16))
tweets$seconds <- as.integer(substr(tweets$timestamp, 18, 19))
tweets$numeric_time <- tweets$hours * 3600 + tweets$minutes * 60 + tweets$seconds
plot(tweets$date,
tweets$numeric_time,
xlab = "",
ylab = "time of the day",
yaxt="n")