I have most of the information done, but can't seem to get the graph with 95% confidence interval and mean in the graph, as well.
Assignment 3BIOL 636/428S Fall 2020 Assignment is due Wednesday Sept. 23 at 11:59 pm. Collaboration is permitted but subject to honor system. For this assignment you will need to write code in R. When turning in your assignment, you should email me a single .pdf file with all of your R code and figures in it, with your last name in the filename. Make sure your R code works properly before submitting. All figures must follow the principles of good figure design outlined in class. All code must follow the principles of proper coding outlined in class. 1. Refer to Problem 6 and Problem 19 in Chapter 2 in your previous homework. All work must be done in R. For problem 6 in Chapter 2 of the previous homework, calculate the Shannon-Weaver index of the data. (1 pt) [1] 1.541317 For problem 19 in Chapter 2 of the previous homework, what is the mean and median of the data? (1 pt) Median= 0.066 Mean= 0.06877 For problem 19 in Chapter 2 of the previous homework, what is the mode of the data? (1 pt) Mode= 0.066 (5 times) For problem 19 in Chapter 2 of the previous homework, what is the range and interquartile range of the data? (1 pt) Range= 0.037-0.172 IQR= 0.0225 For problem 19 in Chapter 2 of the previous homework, what is the variance and standard deviation of the data? (1 pt) Variance= 0.0005612992 Standard Deviation= 0.02369175 For problem 19 in Chapter 2 of the previous homework, what is the skewness and kurtosis of the data? (1 pt) Skewness= 2.29089 Kurtosis= 11.40519 For problem 19 in Chapter 2 of the previous homework, what is the coefficient of variation of the data? (1 pt) Coefficient of variation=0.34450705 For problem 19 in Chapter 2 of the previous homework, what is standard error of the data? (1 pt) Standard error=0.0040046366628929 For problem 19 in Chapter 2 of the previous homework, what is 95% confidence interval of the data? (1 pt) 0.07677927 For problem 19 in Chapter 2 of the previous homework, what is 99% confidence interval of the data? (1 pt) 0.08078391 2. Problem 22 in Chapter 4 of your textbook. For this question there is no dataset to download. Do the values shown represent population parameters or sample estimates? (1 pt) Sample estimates Calculate the standard error for each group (1 pt). Coaches: 0.4512839 Supporter: 0.3186973 Competitor: 0.1967077 Calculate the 95% confidence interval for each group. (1 pt) Coaches: 4.672568 Supporter: 3.797395 Competitor: 2.203415 Based on your results above, is 2 seconds a plausible population mean value for hug duration for competitors? What about supporters? (1 pt) Not for population parameters, but it is definitely plausible for our sample population for both competitor and supporter. It is only 1 second short for the supporter (not including the SE). For which of the groups is 3 seconds a plausible population mean value for the duration of a hug? (1 pt) It is more plausible for the supporters to have 3 second hugs. Plot the data in an appropriate way, including the mean and confidence interval. Paste your R code and figure in here. (5 pts) 3. Refer to Problem 18 in Chapter 4 of your textbook. Download the dataset from https://whitlockschluter.zoology.ubc.ca/data and load it into R. What is the mean and standard deviation of the data? (1 pt) Mean is 70.1 Sd is 48.50074 What is the standard error of the data? (1 pt) 1.831848 Construct the 95% confidence interval of the data. (1 pt) 73.7637 Plot the data in an appropriate way, including the mean and confidence interval. Paste your R code and figure in here. (5 pts) > barplot(flow$numberOfBeetles,names.arg = c("night 1","night 2","night 3","night4","night 5","night 6","night 7","night 8","night 9","night 10"),col = "blue",ylim = c(0,200),xlab="Nights",ylab = "Amt of Beetles that visited",main = "The amount of Beetles visited/night") If you had been given 25 data points instead of 10, would you expect the mean to be significantly greater, less than, or about the same as this sample? What about the standard deviation? (1 pt) The means is usually less than and the standard deviation is the same. If you had been given 25 data points instead of 10, would you expect the standard error of the mean to be significantly greater, less than, or about the same as this sample? (1 pt) The standard error would decrease. 4. Refer to Refer to Problem 14 in Chapter 3 of your textbook. Download the dataset from https://whitlockschluter.zoology.ubc.ca/data and load it into R. What is the explanatory variable and what type is it? The explanatory variable is the vasopressin receptor V1a What is the mean of each group? (1 pt) Control=58.05 Treatment=86.27 What is the standard error of each group (1 pt) Construct the 95% confidence interval of each group. (1 pt) Plot the data in an appropriate way (other than a boxplot), including the mean and confidence interval of each group. Paste your R code and figure in here. (5 pts) Do the 95% confidence intervals overlap? What conclusion can you draw regarding statistical significance? (1 pt) Assignment 3BIOL 636/428S Fall 2020 Assignment is due Wednesday Sept. 23 at 11:59 pm. Collaboration is permitted but subject to honor system. For this assignment you will need to write code in R. When turning in your assignment, you should email me a single .pdf file with all of your R code and figures in it, with your last name in the filename. Make sure your R code works properly before submitting. All figures must follow the principles of good figure design outlined in class. All code must follow the principles of proper coding outlined in class. 1. Refer to Problem 6 and Problem 19 in Chapter 2 in your previous homework. All work must be done in R. For problem 6 in Chapter 2 of the previous homework, calculate the Shannon-Weaver index of the data. (1 pt) [1] 1.541317 For problem 19 in Chapter 2 of the previous homework, what is the mean and median of the data? (1 pt) Median= 0.066 Mean= 0.06877 For problem 19 in Chapter 2 of the previous homework, what is the mode of the data? (1 pt) Mode= 0.066 (5 times) For problem 19 in Chapter 2 of the previous homework, what is the range and interquartile range of the data? (1 pt) Range= 0.037-0.172 IQR= 0.0225 For problem 19 in Chapter 2 of the previous homework, what is the variance and standard deviation of the data? (1 pt) Variance= 0.0005612992 Standard Deviation= 0.02369175 For problem 19 in Chapter 2 of the previous homework, what is the skewness and kurtosis of the data? (1 pt) Skewness= 2.29089 Kurtosis= 11.40519 For problem 19 in Chapter 2 of the previous homework, what is the coefficient of variation of the data? (1 pt) Coefficient of variation=0.34450705 For problem 19 in Chapter 2 of the previous homework, what is standard error of the data? (1 pt) Standard error=0.0040046366628929 For problem 19 in Chapter 2 of the previous homework, what is 95% confidence interval of the data? (1 pt) 0.07677927 For problem 19 in Chapter 2 of the previous homework, what is 99% confidence interval of the data? (1 pt) 0.08078391 2. Problem 22 in Chapter 4 of your textbook. For this question there is no dataset to download. Do the values shown represent population parameters or sample estimates? (1 pt) Sample estimates Calculate the standard error for each group (1 pt). Coaches: 0.4512839 Supporter: 0.3186973 Competitor: 0.1967077 Calculate the 95% confidence interval for each group. (1 pt) Coaches: 4.672568 Supporter: 3.797395 Competitor: 2.203415 Based on your results above, is 2 seconds a plausible population mean value for hug duration for competitors? What about supporters? (1 pt) Not for population parameters, but it is definitely plausible for our sample population for both competitor and supporter. It is only 1 second short for the supporter (not including the SE). For which of the groups is 3 seconds a plausible population mean value for the duration of a hug? (1 pt) It is more plausible for the supporters to have 3 second hugs. Plot the data in an appropriate way, including the mean and confidence interval. Paste your R code and figure in here. (5 pts) 3. Refer to Problem 18 in Chapter 4 of your textbook. Download the dataset from https://whitlockschluter.zoology.ubc.ca/data and load it into R. What is the mean and standard deviation of the data? (1 pt) Mean is 70.1 Sd is 48.50074 What is the standard error of the data? (1 pt) 15.34 Construct the 95% confidence interval of the data. (1 pt) 73.7637 Plot the data in an appropriate way, including the mean and confidence interval. Paste your R code and figure in here. (5 pts) > stripchart(flow$numberOfBeetles,vertical = T,method = "jitter",col = "blue",pch=16) > stripchart(flow$numberOfBeetles,vertical = T,method = "jitter",col = "blue",pch=16,xlab = "nights",ylab = "#ofBeetlesvisited") > segments(c(1),lower95,c(1),upper95,lwd=2) If you had been given 25 data points instead of 10, would you expect the mean to be significantly greater, less than, or about the same as this sample? What about the standard deviation? (1 pt) The means is usually less than and the standard deviation is the same. If you had been given 25 data points instead of 10, would you expect the standard error of the mean to be significantly greater, less than, or about the same as this sample? (1 pt) The standard error would decrease. 4. Refer to Refer to Problem 14 in Chapter 3 of your textbook. Download the dataset from https://whitlockschluter.zoology.ubc.ca/data and load it into R. What is the explanatory variable and what type is it? The explanatory variable is the vasopressin receptor V1a What is the mean of each group? (1 pt) Control=58.05 Treatment=86.27 What is the standard error of each group (1 pt) Construct the 95% confidence interval of each group. (1 pt) Plot the data in an appropriate way (other than a boxplot), including the mean and confidence interval of each group. Paste your R code and figure in here. (5 pts) Do the 95% confidence intervals overlap? What conclusion can you draw regarding statistical significance? (1 pt) 20 40 60 80 100 140 nights #ofBeetlesvisited