I've run the following code and get the graph as provided here. Since the x-axis represents sampling locations I want to the gaps on the x-axis representing values which are irrelevant
ggplot(dat, aes(x=SU,fill=factor(SCIENTIFIC_NAME)))+
geom_bar(width=0.5)+xlab("Sampling Unit (SU)")+
ylab("Count")+labs(fill="SCIENTIFIC NAME")+
ggtitle("Inventory per Sampling Unit (SU) by species")+
scale_x_continuous(breaks=c(1,2,3,4,5,6,7,8,10,11,15))