Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/71.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
R ggplot:条形图面板_R_Ggplot2_Geom Bar - Fatal编程技术网

R ggplot:条形图面板

R ggplot:条形图面板,r,ggplot2,geom-bar,R,Ggplot2,Geom Bar,我有以下数据集: Year, Height, Width, Weight 1990, 5, 45, 190 2000, 7, 77, 210 2010, 2, 20, 150 我想绘制一列条形图,其中包含高度、宽度和重量的绘图。在每个条形图中,将绘制每年的值。因此,假设我的条形图列中的顶部条形图是高度,它将在x轴上显示1990年、2000年和2010年的值5、7和2 我已经找到了如何使用一列条形图,每个条形图代表一年: data <- read.csv("../data/MyData.c

我有以下数据集:

Year, Height, Width, Weight
1990, 5, 45, 190
2000, 7, 77, 210
2010, 2, 20, 150
我想绘制一列条形图,其中包含高度宽度重量的绘图。在每个条形图中,将绘制每年的值。因此,假设我的条形图列中的顶部条形图是高度,它将在x轴上显示1990年、2000年和2010年的值5、7和2

我已经找到了如何使用一列条形图,每个条形图代表一年:

data <- read.csv("../data/MyData.csv")
data.m <- melt(data, id.vars = "Year")

p <- ggplot(data.m, aes(variable, value)) + geom_bar(stat="identity") + facet_wrap(~ Year, ncol=1)
print(p)

data要做到这一点,请将正确的值映射到所需的美学效果。在刻面之前,更容易进行非刻面绘图,以检查一切是否正常

p <- ggplot(data.m, aes(x = Year, y = value)) + 
     geom_bar(stat="identity") + 
     facet_wrap(~ variable, ncol=1)

p您是否尝试将
Year
映射到
aes
ggplot
x
参数,然后用
变量
进行切面处理?啊,就是这样。谢谢@Titolondon!你能把它贴出来作为答案吗?这样我就可以把它标对了?