6.2 在R语言中实现MDS