• API
• FAQ
• Tools
• Archive
SHARE
TWEET

# Untitled

a guest Dec 14th, 2018 61 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
1. xyplot(Mean_Sapflow~Mean_Temperature,
2.              data=Summarised_new_mean_sapflow,
3.              col="red",
4.              pch=19,
5.              xlab="Temperature (°C)",
6.              ylab=expression(paste("Sapflow Litres day"^{-1})),
7.              type=c('p', 'smooth'),
8.              col.line='blue')
9.
10.       ##Produce the date labels for the plot
11.       Date_labels<-c("June", "July",
12.                      "August", "September",
13.                      "October")
14.
15.       ##Insert the labels into the plot
16.       text(Mean_Sapflow~Mean_Temperature,
17.            data=Summarised_new_mean_sapflow,
18.            labels=Date_labels, cex= 0.9, pos=3)
19.
20. structure(list(Date = structure(c(3L, 2L, 1L, 5L, 4L), .Label = c("August",
21. "July", "June", "October", "September"), class
22.     = "factor"), Mean_Humidity = c(17.6073333333333,
23.     21.8006451612903, 18.3896774193548, 14.822, 11.3486666666667),
24.         Mean_Radiation = c(263.673333333333, 270.906451612903, 178.98064516129,
25.         152.233333333333, 93.6), Mean_Temperature = c(70.5613333333333,
26.         61.3306451612903, 71.7335483870968, 72.2136666666667, 81.743
27.         ), Mean_Sapflow = c(16.067, 23.3567741935484, 22.9416129032258,
28.         19.3093333333333, 6.70066666666667)), class = "data.frame", row.names = c(NA,
29.     -5L))
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.

Top