我正在为大约180个填补温室气体排放的国家制作一年(2014年)的热图。 y轴应该是国家,x轴应该是年份。以下是我正在使用的代码,
g<-ggplot(data, aes(x = Year, y = Country, fill = `GHG_Emissions_Per_Capita_w_LULUCF_(tCO2e)`)) +
geom_tile() + scale_fill_gradient2(low = colors[1],
mid = colors[paletteSize/2],
high = colors[paletteSize],
midpoint = (max(data$`GHG_Emissions_Per_Capita_w_LULUCF_(tCO2e)`)+min(data$`GHG_Emissions_Per_Capita_w_LULUCF_(tCO2e)`)) / 2,
name = "Total GHG w LULUCF")
我面临两个问题, 1. y轴上的名称重叠,我似乎无法使y轴更长或更高的瓷砖以容纳名称 2. x轴应该是一个独立元素&#34; 2014&#34;它被分成一个连续的变量。
以下是str(data)
'data.frame': 191 obs. of 4 variables:
$ Country : chr "Afghanistan" "Albania" "Algeria" "Andorra" ...
$ Year : int 2014 2014 2014 2014 2014 2014 2014 2014 2014 2014 ...
$ GHG_Emissions_Per_Capita_wo_LULUCF_(tCO2e): num 1.02 3.13 5.17 6.54 5.86 ...
$ GHG_Emissions_Per_Capita_w_LULUCF_(tCO2e) : num 1.02 3 5.16 6.27 9.36 ...
以下是一些示例数据。
Country Year GHG_Emissions_Per_Capita_wo_LULUCF_(tCO2e) GHG_Emissions_Per_Capita_w_LULUCF_(tCO2e)
1 Afghanistan 2014 1.0185643 1.0185643
2 Albania 2014 3.1277710 3.0039601
3 Algeria 2014 5.1667095 5.1564317
4 Andorra 2014 6.5401349 6.2655871
5 Angola 2014 5.8623365 9.3643598
6 Antigua & Barbuda 2014 11.4753630 11.5420209
7 Argentina 2014 8.1115625 10.3127052
8 Armenia 2014 2.9682122 2.9177457
9 Australia 2014 25.1371295 22.3016710
10 Austria 2014 8.7978737 8.2251670
11 Azerbaijan 2014 7.6137557 6.7257221
12 Bahamas, The 2014 7.1029869 8.1139307
这是我试图制作的情节的截图
提前感谢您的帮助。