Roman KlimenkoBlogPhotography

My tweets

April 17, 2015

pet-projectdatar

This is my first app in R. Just a visualization of my tweets over time:

tweets2560x1600

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")