Linh Le - Bio Lab

Data:

od6<-tribble(
  ~"Time", ~"OD600", ~"Log(OD600)",
  #--|--|----

  30,0.036,-1.444,
  60,-0.037, -1.432,
  90.5,0.085,-1.070,
  120,0.086, -1.065,
  150,0.376, -0.425,
  180,0.394, -0.404,
  210,0.647,-0.189,
  240, 0.780,-0.108,
  270,0.936,-0.029,
  300,1.321,0.121,
  330, 1.497, 0.175,
  360,1.548,0.190,
  390,1.646,0.216,
  420,1.786,0.252,
  450,1.991,0.281
  
  
)

Graph value of time in minutes and OD600

ggplot(od6, aes(x=Time, y = OD600))+
  geom_smooth()

Graph value of time in minutes and log OD600

ggplot(od6, aes(x=Time, y = `Log(OD600)`))+
  geom_smooth()