The code creates a barplot comparing Delay Time and the Destination of various flights, but I have to alter it so it is in ascending order. I'm not sure whether to use order(), reorder(), etc.
tapply(df.delays$Delay,df.delays$Destination, sum)
totaldelay<-tapply(df.delays$Delay,df.delays$Destination, sum)
barplot(totaldelay, main="Total Delay Destination", xlab="Destination",ylab="Total Delay Time", ylim=c(0,25000))