Tag: ggplot2

如何添加纹理来填充ggplot2中的颜色?

我目前使用scale_brewer进行填充,这些颜色看起来非常漂亮(在屏幕上和通过彩色打印机),但是在使用黑白打印机时会相当均匀地以灰色打印。 我search了在线ggplot2文档,但没有看到任何添加纹理来填充颜色。 有没有官方的ggplot2方式来做到这一点,或有没有人有他们使用的黑客? 纹理我的意思是像斜杠,反斜杠,圆点图案等,这些将在黑白打印时区分填充颜色。

ggplot2 – 在图的外部注释

我想将样本大小值与图上的点关联起来。 我可以使用geom_text来定位点附近的数字,但这是混乱的。 将它们沿着剧情的外边缘排列起来会更加清晰。 例如,我有: df=data.frame(y=c("cat1","cat2","cat3"),x=c(12,10,14),n=c(5,15,20)) ggplot(df,aes(x=x,y=y,label=n))+geom_point()+geom_text(size=8,hjust=-0.5) 哪个产生这个情节: 我更喜欢这样的东西: 我知道我可以创build第二个绘图,并使用grid.arrange ( 这个post ),但确定textGrobs与y轴排列的间距是很繁琐的。 有没有更简单的方法来做到这一点? 谢谢!

模拟ggplot2默认调色板

我可以使用什么函数来模拟ggplot2的默认调色板以获得所需的颜色数量。 例如,input3会产生一个HEX颜色的字符向量,其颜色为:

将图例添加到ggplot2线图

我有一个关于ggplot2的传说的问题。 我设法在同一个图中绘制三条线,并且想要使用三种颜色添加图例。 这是使用的代码 library(ggplot2) require(RCurl) link<-getURL("https://dl.dropbox.com/s/ds5zp9jonznpuwb/dat.txt") datos<- read.csv(textConnection(link),header=TRUE,sep=";") datos$fecha <- as.POSIXct(datos[,1], format="%d/%m/%Y") temp = ggplot(data=datos,aes(x=fecha, y=TempMax,colour="1")) + geom_line(colour="red") + opts(title="TITULO") + ylab("Temperatura (C)") + xlab(" ") + scale_y_continuous(limits = c(-10,40)) + geom_line(aes(x=fecha, y=TempMedia,colour="2"),colour="green") + geom_line(aes(x=fecha, y=TempMin,colour="2"),colour="blue") + scale_colour_manual(values=c("red","green","blue")) temp 和输出 我想用三种颜色和variables名称(TempMax,TempMedia和TempMin)添加一个图例。 我努力了 scale_colour_manual 但是找不到确切的方法。 不幸的是原始数据从链接网站删除,无法恢复。 但他们来自这种格式的气象数据文件 "date","Tmax","Tmin","Tmed","Precip.diaria","Wmax","Wmed" 2000-07-31 00:00:00,-1.7,-1.7,-1.7,-99.9,20.4,20.4 2000-08-01 00:00:00,22.9,19,21.11,-99.9,6.3,2.83 2000-08-03 00:00:00,24.8,12.3,19.23,-99.9,6.8,3.87 2000-08-04 00:00:00,20.3,9.4,14.4,-99.9,8.3,5.29 […]

更改离散x比例的顺序

我正在使用离散x尺度的ggplot制作一个闪避的条形图,x轴现在按照字母顺序排列,但我需要重新排列它,以便按照y轴的值sorting(即最高的小节将定位在左侧)。 我尝试了顺序或sorting,但导致sorting的X轴,而不是分别为条。 我做错了什么?

ggplot的qplot不执行采购

假设我有两个源文件,第一个是example1.r ,第二个是example2.r (如下所示)。 example1.r plot(1:10,1:10) example2.r qplot(1:10,1:10) 当我来源example1.r时,绘制graphics。 但是,当我inputexample2.r时,它并不是。 这里有什么解决scheme? (在example2.r中的qplot是ggplot2的函数)

使用ggplot2在同一个图上绘制两个variables作为行

一个非常新鲜的问题,但说我有这样的数据: test_data <- data.frame( var0 = 100 + c(0, cumsum(runif(49, -20, 20))), var1 = 150 + c(0, cumsum(runif(49, -10, 10))), date = seq(as.Date("2002-01-01"), by="1 month", length.out=100) ) 如何在同一图表上绘制时间序列var0和var1 ,并在x轴上使用ggplot2 ? 如果您使var0和var1不同的颜色,并可以包括一个图例奖金点! 我确信这很简单,但我找不到任何例子。

左alignment两个graphics边(ggplot)

我正在使用ggplot,并有两个图表,我想要显示在彼此之上。 我使用grid.arrange的grid.arrange来堆叠它们。 问题是我希望graphics的左边缘alignment以及右边缘,而不pipe轴标签。 (问题出现是因为一个图的标签很短而另一个图的标签长)。 问题: 我该怎么做? 我不嫁给grid.arrange,但ggplot2是必须的。 我试过了: 我试着用宽度和高度以及ncol和nrow来制作一个2 x 2的网格,并将视觉对象放在对angular上,然后用宽度进行播放,但是我不能在对angular看到视觉效果。 require(ggplot2);require(gridExtra) A <- ggplot(CO2, aes(x=Plant)) + geom_bar() +coord_flip() B <- ggplot(CO2, aes(x=Type)) + geom_bar() +coord_flip() grid.arrange(A, B, ncol=1)

在ggplot2中显示堆积条形图上的数据值

我想在ggplot2的堆积条形图上显示数据值。 这是我的企图代码 Year <- c(rep(c("2006-07", "2007-08", "2008-09", "2009-10"), each = 4)) Category <- c(rep(c("A", "B", "C", "D"), times = 4)) Frequency <- c(168, 259, 226, 340, 216, 431, 319, 368, 423, 645, 234, 685, 166, 467, 274, 251) Data <- data.frame(Year, Category, Frequency) library(ggplot2) p <- qplot(Year, Frequency, data = Data, geom = "bar", fill […]

用2个y轴绘制,左边是一个y轴,右边是另一个y轴

我需要在一个图表中显示计数和显示比率的折线图,我可以单独做这两个,但是当我把它们放在一起时,第一层(即geom_bar )的比例与第二层(即geom_line )。 我可以将geom_line的轴向右移动吗?