用r写个代码做一个桑基图

刚入门导师遇到个难题，希望帮忙做一下，让我参考一下代码再学习

参考一下这里：