<iframe src="https://exploratory.io/data/kanaugust/d5eae4b54363?embed=true" frameborder="0" width="100%" height="100%" > </iframe>
The data is from US Department of Transportation. I have applied dist function to calculate the distance among the columns and cmdscale function to calculate the positions of the columns in 2 dimensional space.