ggplot2

3热度

2回答

我有一个数据组像下面这样： DataFrame <- data.frame(x=runif(25),y=runif(25), z=sample(letters[1:4],25,rep=TRUE)) 和使用格包，我可以与等于轴的散点图（用1：1线经历的中心）采用下面几行： xyplot(y ~ x | z, data=DataFrame, scales=list(

4热度

2回答

R中的现金流量图？

在解释金融工程中的衍生工具时，通常使用现金流图。它显示了不同时间的收益。我无法找到一个很好的例子，在网上，但它看起来是这样的：我想用ggplot2使一些大致相当。我的想法是使用堆叠bar plot，其中零轴位于中间的某处。有谁知道如何做到这一点？下面是一些示例数据： data.frame(time=c(1, 2, 3), positive=c(5, 0, 4), negative=c(-2,

7热度

2回答

如何让ggplot2图更漂亮？

我已生成使用R代码如下情节紧接其后： ggplot(lengths, aes(length, fill = library)) + geom_density(alpha = 0.2) + coord_cartesian(xlim = c(0, 60000)) 现在我想作的情节有点漂亮：使x轴放映长度每个 5000个单位（而不是每20000个）在三个峰（大约3000,5000和35000）

3热度

1回答

有序因素GGPLOT2条形图

我有一个数据帧（为了简化）判断，电影，和评分（评分是在1星到5星标）： d = data.frame(judge=c("alice","bob","alice"), movie=c("toy story", "inception", "inception"), rating=c(1,3,5)) 我想创建一个条形图，其中X轴是星星的数量，每个条形的高度是该星形的收视率。如果我做 ggplot(

3热度

1回答

R ggplot：通过索引指定aes

ggplot() + layer( data = diamonds, mapping = aes(x = carat, y = price), geom = "point", stat = "identity" ) 在上面的例子中，我想知道是否可以通过索引为“aes”函数指定参数。我知道克拉和价格对应钻石名称阵列中的第1和第8个元素。你能解释为什么以下不起作用吗？ ggplot() +

3热度

1回答

如何用ggplot创建并排的条形图（用于多个系列）？

我有两组数据（3列：x = categorical，y =数字，l =位置），我想创建一个条形图，其中包含x轴上的类别，对于每个类别的值，垂直条，颜色不同，每个位置的y值。默认情况下，Excel/OpenOffice生成这种图表。我试图 qplot (x,y,data=mydata,col=location, geom="histogram") 但它产生堆积条形图，不并排。然后我查看了ggp

9热度

3回答

ggplot：推荐的调色板也可以区分为黑白打印？

我已经开始制作纸张的图表。对于其中一些条形图，我使用了“Pastel1”调色板（正如ggplot2中的书中推荐的那样，对于填充区域（例如条），柔和的颜色比饱和的要好。 Pastel至少存在的问题是，当打印在B & W激光打印机上时，颜色难以区分。我不知道读者会在屏幕上查看纸张或将打印对B的& W，所以我在寻找以下任一操作：如何添加哈希线到调色板如Pastel1（希望散列线也很细微）调色板容易在

70热度

1回答

ggplot：如何增加刻面图之间的间距？

我有几个多面直方图（用下面的命令获得），它们很好地被绘制在另一个之下。我想增加它们之间的间距，但是它们很紧密。我看着doc，但没有找到这个参数。在此先感谢。 qplot (Happiness.Level, Number.of.Answers, data=mydata, geom="histogram") + facet_grid (Location ~ .)

0热度

1回答

ggplot：如何覆盖ylim间隔？

我有一个多面情节（关于这个问题我有这个other问题）。我想控制ylim（）的时间间隔，以减少混乱，因为它看起来像这样：这太详细，我想只显示0到500，这是甚至没有最大（细水平线足够）。我想要的原因，只有那些2倍的值是：减小粒度（中值每200竖直地塞满）通过避免1000将有和属于该小面积的下一个值0之间更大的空间下面。在此先感谢。

29热度

2回答

ggplot2，facet_grid，自由秤？

在以下示例中，如何根据每个面板中的数据来获取y轴限制值？ mt <- ggplot(mtcars, aes(mpg, wt, colour = factor(cyl))) + geom_point() 这些都不一定会做到： mt + facet_grid(. ~ cyl, scales="free") mt + facet_grid(. ~ cyl, scales="free_y")