Tag: ggplot2

ggplot中的控制点边界厚度

当使用ggplot时，我可以将shape设置为21-25，以获得具有内部（ fill ）和边框（ col ）颜色的独立设置的形状，如下所示： df <- data.frame(id=runif(12), x=1:12, y=runif(12)) ggplot(df, aes(x=x, y=y)) + geom_point(aes(fill=id, size=id), colour="black", shape=21) 但是，我无法弄清楚如何控制形状边框的厚度，或者将它们设置为绝对的或者作为一种审美的映射。 我注意到，如果我设置了一个lwd值，它就会覆盖size美感： ggplot(df, aes(x=x, y=y)) + geom_point(aes(fill=id, size=id), colour="black", shape=21, lwd=2) 我如何控制边框的厚度？

ggplot分组的酒吧情节

我有一个调查文件，其中行是观察和列问题。 以下是一些假冒的数据 ： People,Food,Music,People P1,Very Bad,Bad,Good P2,Good,Good,Very Bad P3,Good,Bad,Good P4,Good,Very Bad,Very Good P5,Bad,Good,Very Good P6,Bad,Good,Very Good 我的目标是用ggplot2创build这种情节。 我绝对不在乎颜​​色，devise等 情节不符合假数据 这里是我的假数据： raw <- read.csv("http://pastebin.com/raw.php?i=L8cEKcxS",sep=",") raw[,2]<-factor(raw[,2],levels=c("Very Bad","Bad","Good","Very Good"),ordered=FALSE) raw[,3]<-factor(raw[,3],levels=c("Very Bad","Bad","Good","Very Good"),ordered=FALSE) raw[,4]<-factor(raw[,4],levels=c("Very Bad","Bad","Good","Very Good"),ordered=FALSE) 但是，如果我selectY作为计数，那么我正面临一个关于selectX和组值的问题…我不知道如果我不能使用reshape2 ，我是否能成功…我也厌倦了使用重塑function。 但我不明白如何使用它…

如何在R中绘制函数曲线

绘制一个简单的曲线的function是什么样的 eq = function(x){x*x} 在R？ 这听起来很明显的问题，但我只能在stackoverflow上find这些相关的问题，但它们都更具体 在R中绘制线function 在R中的数据点之上绘制函数 我怎样才能绘制复杂的数字R函数？ 如何绘制一个简单的分段线性函数？ 在同一个绘图中绘制多个函数曲线 我希望我没有写一个重复的问题。

Adobe Illustrator中的ggplot2 pdf导入缺less字体AdobePiStd

我创build了几个简单的ggplot2图，并使用以下命令将它们保存为PDF文件： p <- ggplot(plotobject, aes(x=Pos, y=Pval),res=300) ggsave(plot=p,height=6,width=6,dpi=200, filename="~/example.pdf") 如果我现在在Adobe Illustrator中打开这个example.pdf，我得到以下错误： 字体AdobePiStd丢失。 受影响的文本将使用替代字体显示。 有没有办法在ggplot2指定一个字体（我认为这是点/点），Adobe将理解或以其他方式获得这种字体在Adobe工作？ /编辑只是为了澄清，文本/标签/标题都很好，它是字体/ edit2缺less的点我通过在ggsave中使用EPS输出得到了一个工作解决scheme，但仍然希望find一种方法也可以直接在AI中打开/导入PDF格式的ggplot2图

如何指定facet_grid中的列或如何更改facet_wrap中的标签

我有大量的数据系列，我想绘制使用小倍数。 ggplot2和facet_wrap组合是我想要的，通常产生一个很好的小块6×6方面。 这是一个更简单的版本： 问题是，我没有足够的控制面标签中的标签。 数据框中列的名称很短，我想保持这种方式，但我希望facet中的标签更具描述性。 我可以使用facet_grid这样我就可以利用facet_grid函数，但是似乎没有直接的方法来指定列的数量，并且一长串facet不能用于这个特定的任务。 我错过了什么明显的？ 问：如何在不更改列名的情况下使用facet_wrap更改构面标签？ 或者，如何在使用facet_grid时指定列数和行数？ 下面是一个简化例子的代码。 在现实生活中，我正在处理多个组，每个组包含数十个数据序列，每个数据序列都经常变化，所以任何解决scheme都必须自动化，而不是依靠手动赋值。 require(ggplot2) require(reshape) # Random data with short column names set.seed(123) myrows <- 30 mydf <- data.frame(date = seq(as.Date('2012-01-01'), by = "day", length.out = myrows), aa = runif(myrows, min=1, max=2), bb = runif(myrows, min=1, max=2), cc = runif(myrows, min=1, max=2), dd = runif(myrows, min=1, max=2), […]

ggplot2中的facet_wrap（）和facet_grid（）有什么区别？

我一直在阅读两个函数的ggplot2文档。 我想知道有什么区别，什么是正确的情况下使用每个函数（ facet_wrap()和facet_grid() ）。 library(ggplot2) p <- qplot(displ, hwy, data = mpg) p + facet_wrap(~ cyl) p + facet_grid(~ cyl) 我提供这个小例子作为起点。 差别似乎是包装使得情节更加自主和网格使一个情节一起。

ggplot geom_text字体大小控制

我试图通过做这样的事情来改变我的酒吧在ggplot2的标签的字体为10： ggplot(data=file,aes(x=V1,y=V3,fill=V2)) + geom_bar(stat="identity",position="dodge",colour="white") + geom_text(aes(label=V2),position=position_dodge(width=0.9), hjust=1.5,colour="white") + theme_bw()+theme(element_text(size=10)) ggsave(filename="barplot.pdf",width=4,height=4) 但是由此产生的图像的条形图标签具有超大的字体大小。 然后我想用geom_text()修改： geom_text(size=10,aes(label=V2),position=position_dodge(width=0.9), hjust=1.5,colour="white") 标签字体甚至更大… 我可以将geom_text的大小更改为3，现在看起来像字体10，类似于轴标签。 我想知道发生了什么事？ theme(text=element_text(size=10))是否不适用于标签？ 为什么geom_text()的10的大小与theme(text=element_text()) ？

使用ggplot2绘制“序列标识”？

是否可以使用ggplot2绘制一个序列标志图 ？ 有一个基于名为“ seqLogo ”的“grid”的软件包 ，但我想知道是否可以有一个ggplot2版本。 谢谢。

标题是variables名称时如何给ggplot添加标题？

在ggplot的结尾，这工作正常： + opts(title = expression("Chart chart_title…")) 但是这不是： chart_title = "foo" + opts(title = expression(chart_title)) 也没有这个： chart_title = "foo" + opts(title = chart_title) 如果标题是variables名称，我怎样才能将一个标题添加到ggplot？

子集和ggplot2

我有一个问题，用ggplot2绘制一个数据框的子集。 我的df就像： ID Value1 Value2 P1 100 12 P1 120 13 … P2 300 11 P2 400 16 … P3 130 15 P3 140 12 … 我现在如何绘制Value1和Value2仅用于ID P1和P3？ 例如，我试过： ggplot(subset(df,ID=="P1 & P3") + geom_line(aes(Value1, Value2, group=ID, colour=ID))) 但我总是收到一个错误。 PS我也尝试了许多与P1和P3的组合，但我总是失败..