data = rbind(c(94,97,100,100,100,100),c(61,80,88,88,92,100))
barplot(data,names.arg=c(10,20,50,100,200,1000),main="Impact of N on trigger/Trojan coverage",xlab="N",ylab="Coverage(%)",beside=TRUE,col=c("darkblue","red"))

data = rbind(c(94,97,100,100,100,100),c(61,80,88,88,92,100))
barplot(data,names.arg=c(10,20,50,100,200,1000),main="Impact of N on trigger/Trojan coverage",xlab="N",ylab="Coverage(%)",beside=TRUE,col=c("darkblue","red"))
legend(x="topright",legend=c(0,1),fill=c("darkblue","red"))

plot(1:3,
    col=c("black",rgb(96,123,139, 50, maxColorValue=255),
               rgb(225,64,5, 50,maxColorValue=255)),pch=19)

legend("topright", c("Shuffled", "Riffled", "Somosome"), cex=1.0, bty="n",
   col=c("black",rgb(96,123,139, 50, maxColorValue=255),
      rgb(225,64,5, 50, maxColorValue=255)),pch=19)