A simple barplot is the best way to plot this data. But to make it a little more appealing, i want to use a custom font and a wallpaper from the Hurricane Festival website. But before i start plotting, i need to get the data in shape.

R

1

2

3

4

5

6

7

8

9

10

11

#These packages will be needed

library("dplyr")

library("tidyr")

library("ggplot2")

library("jpeg")

library("grid")

library("extrafont")

# read in the data

hurricane<-read.csv("Gesamt_1997_2015.csv",header=F,sep=";")

colnames(hurricane)<-c("bands","year")

With some Dplyr-magic we aggregate the count of bands per year:

R

1

2

3

# Group by year and count the number of bands in each year

plot.df<-hurricane%>%group_by(year)%>%summarise(count=n())

plot.df$year<-as.factor(plot.df$year)

I want to use the font „Open Sans“. You can download the font here Open Sans. Then you have to import it in R using the „extrafont“-package.

ggtitle("How many Bands had each Hurricane-Festival in the years 1997-2015?")+

labs(x="@Niels_Bremen")

plot

By the way, this is what the plot would look like with ggplot2-defaults:

Not that bad, for just one line of code.

R

1

ggplot(plot.df,aes(x=year,y=count))+geom_bar(stat="identity")

Anyway, here are some further graphics:
Here, i tried to give one point for each time a band has played at hurricane-festival. I tried to use an icon (png-file) of a hand instead of a point, but haven´t figured out how to do it.