å¨ååå§æ°æ®åï¼å°å
¶å¨Rä¸å½å为testï¼è¿è¡ä»¥ä¸æ°æ®å°±è½å¾å°ä½ è¦ç
æ¡å½¢å¾äº
tp <- barplot(test$Length_distribution, names.arg=test$Sequence_size, las =2, ylim=c(0,30000),col="black")
text(tp, test$Length_distribution, labels =test$Length_distribution,pos=4,srt=90,offset=0)
追é®æè¦ç´æ¹å¾ä½ ç»ææ¡å½¢å¾ï¼é