Question 10.7

[kevinlinke]

Thank you for writing up these solutions! They were very helpful to me.
The answer to 10.7 is incorrect- the observations should be normalized by row rather than by column, which will yield a fixed ratio of 1/6. All that needs to change is your first line:

dsc = t(scale(t(USArrests)))
a = dist(dsc)^2
b = as.dist(1 - cor(t(dsc)))
summary(b/a)