method draft
deerone
LABdata.docx1.
> print("Hello!")
[1] "Hello!"
> print("Hello!", quote = F)
[1] Hello!
starting httpd help server ... done
> ?lm
> x <- 14
> x
[1] 14
> 23 + 3
[1] 26
> y <- 23 + 3
> y
[1] 26
> z <- print("Bye!")
[1] "Bye!"
> z
[1] "Bye!"
> "Leopards Ate My Face!" -> derp
> derp
[1] "Leopards Ate My Face!"
> x + y
[1] 40
> y + z
Error in y + z : non-numeric argument to binary operator
2.
> getwd()
[1] "C:/Users/Lu/Desktop/Assignment/BIOL3535"
setwd("C:/Users/Lu/Desktop/Assignment/BIOL3535")
3.
> dim(traits)
[1] 633 26
4.
traits[8,7:20]
photo_or_filename latitude_hhmmss longitude_hhmmss latitude_decimal longitude_decimal elevation_m MAT_degC MAP_mm
8 0514_001 37°_40'_8.4''_N 116°_0'_42.48''_W 37.669 -113.0118 1901 8.6 348
lobing teeth regularity_of_teeth closeness_of_teeth teeth_rounded_appressed teeth_acute
8 0 0 0 0 0 0
5.
6.
plot(traits$ length_width_ratio,traits$MAP_mm)
7.
> plot(stomata.mean$log_MAP_mm, stomata.mean$log_stomatal_density)
> lm(log_stomatal_density ~ log_MAP_mm, data = stomata.mean)
> abline(lm(log_stomatal_density ~ log_MAP_mm, data = stomata.mean))
> summary(lm(log_stomatal_density ~ log_MAP_mm, data = stomata.mean))
> plot(stomata.mean$log_MAT_degC, stomata.mean$log_stomatal_density)
> lm(log_stomatal_density ~ MAT_degC, data = stomata.mean)
> abline(lm(log_stomatal_density ~ log_ abMAT_degC, data = stomata.mean))
> summary(lm(log_stomatal_density ~ log_ MAT_degC, data = stomata.mean))
plot(area.mean$log_MAP_mm, area.mean$log_leaf_area, xlab = "Log MAP (mm)", ylab = "Log Leaf Area (mm^2)")
lm(log_leaf_area ~ MAP_mm, data = area.mean)
abline(lm(log_leaf_area ~ MAP_mm, data = area.mean))
summary(lm(log_leaf_area ~ MAP_mm, data = area.mean))
