R语言数据转化的问题

用R或者excel请问各位大佬，上面的形式怎么转化成下面那种啊？谢谢