Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- tiff(filename = "bootstrapping1123.tiff", width = 3200, height = 3200, units = "px", res = 400)
- #data<-read.csv("Random_table_analyze1000_final.txt", header=FALSE)
- #hist(data$V1, main='', xlab='The cases with shared targets (%)', ylab='Frequency of the cases')
- #, cex.axis=1.4, cex.lab=1.4)
- info<-hist(data$V1, main='', xlab='', ylab='Frequency of the cases', xaxt='n')
- with(info, text(mids, mids, label=mids, pos=1))
- title(xlab="The cases with shared targets (%)", line=0)
- dev.off()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement