we use the data from ….. I propose the following questions based on my own understanding of the data.
-1. What is the mean of the tempatures in the city of SanFrancisco?
-2. What is the median of the tempatures in the city of SanFrancisco?
-3. What is the variance of the tempatures in the city of SanFrancisco?
-4. What is the standard deviation of the tempatures in the city of SanFrancisco?
-5. What is the mean of the tempatures in the city of DesMoines?
-6. What is the median of the tempatures in the city of DesMoines?
-7. What is the variance of the tempatures in the city of DesMoines?
-8. What is the standard deviation of the tempatures in the city of DesMoines?
-9. What is the correlation between the tempatures in SanFrancisco and DesMoines
-10. What is the distrabution of the tempatures in the city of SanFrancisco?
We will explore the questions in detail.
blank = read.csv("https://www.lock5stat.com/datasets3e/April14Temps.csv")
head(blank)
## Year DesMoines SanFrancisco
## 1 1995 56.0 51.0
## 2 1996 37.5 55.3
## 3 1997 37.2 55.7
## 4 1998 56.0 48.7
## 5 1999 54.3 56.2
## 6 2000 63.3 57.2
mean(blank$SanFrancisco, na.rm = TRUE)
## [1] 54.248
The mean of temp in SanFracisco is 54.2483
median(blank$SanFrancisco, na.rm = TRUE)
## [1] 54.2
The median of temp in SanFrancisco is 54.2
var(blank$SanFrancisco, na.rm = TRUE)
## [1] 9.3701
The variance of the temp in SanFrancisco is 9.3701
sd(blank$SanFrancisco, na.rm = TRUE)
## [1] 3.061062
The standard deviation of the temp in SanFrancisco is 3.061062
mean(blank$DesMoines, na.rm = TRUE)
## [1] 53.732
The mean of temp in DesMoines is 53.732
median(blank$DesMoines, na.rm = TRUE)
## [1] 54.7
The median of temp in DesMoines is 54.7
var(blank$DesMoines, na.rm = TRUE)
## [1] 125.0114
The variance of temp in DesMoines is 125.0114
sd(blank$DesMoines, na.rm = TRUE)
## [1] 11.18085
The standard deviation of temp in DesMoines is 11.18085
cor(blank$SanFrancisco, blank$DesMoines, use = "everything")
## [1] -0.02844925
The correlation between the temps of SnaFrancisco and DesMoines is -0.02844925
hist(blank$SanFrancisco, main = "Histogram of Temp in SanFrancisco", xlab = "Temp", col = "blue")