Differences

This shows you the differences between two versions of the page.

--- r:graphics [2017/11/27 09:51] – [e.g. 2] hkimscil
+++ r:graphics [2017/11/27 09:57] (current) – [Adding Confidence Intervals to a Bar Chart] hkimscil
@@ Line 421: / Line 421: @@
 +         names.arg=c("May", "Jun", "Jul", "Aug", "Sep"),
 +         ylab="Temp (deg. F)")</code>
-{{:R:barplot_heights.png}}
+{{:R:barplot_heights.2.png}}
 ====== Adding Confidence Intervals to a Bar Chart ======
@@ Line 432: / Line 432: @@
 </code>
-<code>tmean <- tapply(Temp, list(as.factor(Month)), mean)  # mean for each month
+<code>tmean <- tapply(Temp, list(as.factor(Month)), mean)
-tsd <- tapply(Temp, list(as.factor(Month)),sd)  # sd for each month
+# mean for each month
-tse <- tsd/sqrt(length(Temp))  # se for each month
+tsd <- tapply(Temp, list(as.factor(Month)),sd)
+# sd for each month
+tse <- tsd/sqrt(length(Temp))
+# se for each month
 lower <- tmean - 1.96*tse