Guest User

Untitled

a guest
May 25th, 2018
100
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.88 KB | None | 0 0
  1. time gene value
  2. A1.01 TMCS09g1008676 0.423176672
  3. A1.02 TMCS09g1008676 0.911415197
  4. A1.03 TMCS09g1008676 1.042786687
  5. A1.04 TMCS09g1008676 0.859630996
  6. A1.05 TMCS09g1008676 0.624891793
  7. A1.01 TMCS09g1008677 0.304568066
  8. A1.02 TMCS09g1008677 1.134582618
  9. A1.03 TMCS09g1008677 1.626528999
  10. A1.04 TMCS09g1008677 1.778379422
  11. A1.05 TMCS09g1008677 1.922418792
  12. A1.01 TMCS09g1008678 0.312127815
  13. A1.02 TMCS09g1008678 0.567599868
  14. A1.03 TMCS09g1008678 1.37594692
  15. A1.04 TMCS09g1008678 1.655878776
  16. A1.05 TMCS09g1008678 1.720470659
  17.  
  18. ggplot(mydata, aes(as.factor(time), value)) +
  19. geom_hline(yintercept = 0, linetype = 2, color = "red") +
  20. # Line for each gene
  21. geom_line(aes(group = gene), size = 0.5, alpha = 0.3, color = "blue") +
  22. # Trend line
  23. geom_smooth(size = 2, se = FALSE, color = "orange") +
  24. scale_x_continuous(breaks = factor(prova$time)) +
  25. theme_classic()
Add Comment
Please, Sign In to add comment