Answer:
Figure attached
We can conclude that majority of the values are positive. And we can say that is skewed to the right because the Median< Mean is and we have most of the values at the left of the distribution.
Explanation:
We can use the following R code to obtain the data for wdiff:
source("http://www.openintro.org/stat/data/cdc.R") #obtain the info
nrow(cdc) # number of elements
names(cdc) # obtain the name for the variable
[1] "genhlth" "exerany" "hlthplan" "smoke100" "height" "weight" "wtdesire" "age"
[9] "gender"
wdiff represent the difference between desired weight (wtdesire) and current weight (weight) and we can obtain the data with the following code:
wdiff <- (cdc$weight-cdc$wtdesire)
And now we can create the histogram with this code
hist(wdiff,xlim =c(-100,150))
> mean(wdiff)
[1] 14.5891
> median(wdiff)
[1] 10
And the result is on the figure attached.
And we can conclude that majority of the values are positive. And we can say that is skewed to the right because the Median< Mean is and we have most of the values at the left of the distribution.