如何在ggplot2图形的多个面内手动着色条形图，为每个面使用不同的颜色？

Question

我在ggplot2中构建了一个分面图，每个方面代表一个具有3种不同度量（能力，经验和价值观）的组织。到目前为止，我得到了以下输出，这很好，但我需要更进一步：

qplot(Trust.Bucket, Trust.Average, data = mydata, geom="bar", fill=Firm, facets = . ~ Firm)
q <- qplot(Trust.Bucket, Trust.Average, data = mydata, geom="bar", fill=Firm, facets = . ~ Firm)
q + scale_y_continuous(limit = c(0, 5)) + opts(axis.text.x=theme_text(angle=-90))

它基本上填充了具有不同颜色的每个构面/组织的所有3个条形图（能力，经验和值）。这很好，但我需要的是以与上面相同的方式为每个方面着色，但使用facet标题中指示的每个组织的品牌颜色（例如Amazon =“darkorange4”，Apple =“grey49”，Google =“ springgreen3“等。我的代码中有什么可以错过的？

非常感谢您的帮助。