setwd("~/Sites/ukkel")
read.csv("ukkel_tt.csv", sep=";")
ukkel <- read.csv("ukkel_tt.csv", sep=";")
head(ukkel)
colnames(ukkel) <- c("Jaar","1","2","3","4","5","6","7","8","9","10","11","12")
head(ukkel)
melt <- melt(ukkel, id=c("Jaar"))
library("reshape2", lib.loc="/Library/Frameworks/R.framework/Versions/3.1/Resources/library")
melt <- melt(ukkel, id=c("Jaar"))
head(melt)
colnames(melt) <- c("Jaar", "Maand", "T")
head(melt)
write.csv(melt, "temperature2.csv")
d3.csv("temperature2.csv", function(error, data) { ... }
Makes scales
Restructures data
Calculates lines (and interpolates)
Draws lines
Draws invisible lines for hover
Animate lines
Write functions for every step (animations and text)
Tell the story
Make it lighter
Make it playful
No 'diffs', 'anomalies', ...
but °C
No chart junk
Almost no color
Rounded curves
Familiar to everyone
Experienced by everyone
In the news