R 将行名称转换为值并保留相应值的列

我想将行名称转换为值，并保留相应的值。我的数据在第一列中有国家名称，在单元格中有值的其余列的列名中有年份。我想将其转换为正确的表格式。请参见下面的示例

表格formate的示例：

国家| 2002 | 2003 |

加拿大| 2.2 | 2.4 |

美国| 4.2 | 7.4 |

我希望表格的格式为： 国家|年|值

加拿大| 2002 | 2.2

加拿大| 2.2 | 2.4

我认为这个国家应该使用的整洁的数据包正在被抛弃。请参见下面的示例

数据：

ElectricCarStock\u BEVandPHEV这应该可以做到：

library(reshape2)
library(tidyverse)
ElectricCarStock_BEVandPHEV %>% 
  melt(id.vars="Country")

library（tidyverse）；ElectricCarStock\u BEVandPHEV%>%聚集（键、值、国家）
library(tidyr)
library(dplyr)
 temp<-gather(ElectricCarStock_BEVandPHEV, Country, 2:13)
  head(temp)

library(reshape2)
library(tidyverse)
ElectricCarStock_BEVandPHEV %>% 
  melt(id.vars="Country")