我试图基于此表将两个ggplot2图合并为一个:
Type RatingA RatingB
1 One 3 36
2 Two 5 53
3 One 5 57
4 One 7 74
5 Three 4 38
6 Three 8 83
Run Code Online (Sandbox Code Playgroud)
我想制作两个散点图,其中y轴的等级平均值,x轴上的类型.
这是我创建每个图形的方式:
p1 <- ggplot(test, aes(x=reorder(Type, RatingA, mean), y=RatingA)) +
stat_summary(fun.y="mean", geom="point")
p2 <- ggplot(test, aes(x=reorder(Type, RatingB, mean), y=RatingB)) +
stat_summary(fun.y="mean", geom="point")
Run Code Online (Sandbox Code Playgroud)
由于p1和p2具有相同的x轴,我希望它们可以垂直排序.我看着facet_align,但我找不到能做到这一点的东西.
我有大量的小块地块需要放在一个更大的地块画布上,并将小块地块安排进去并用线条连接起来.一个小例子如下所示:
A到L是独立的图.给出了他们的位置的坐标.

绘图网格坐标:PlotgridX和plotgridY可以决定小图需要居中的时间
plotcord <- data.frame (
plotname = c("A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L"),
plotgridX = c( 1.5, 2, 5, 5.5, 1.75, 5.25, 8 , 1 , 2, 3.5, 6, 7.5),
plotgridY = c( 3, 3, 3, 3, 2 , 2, 2, 2 , 1, 1, 1, 1))
plotname plotgridX plotgridY
1 A 1.50 3
2 B 2.00 3
3 C 5.00 3
4 D 5.50 3
5 E 1.75 2
6 F …Run Code Online (Sandbox Code Playgroud) 我使用的是textplot()从gplots包写的定义,然后可旁边显示使用其他地块par(mfrow=c(3,2)).
我想将字符串中的单个单词更改为粗体(通常是定义的单词).是否有一个元字符可以让我在""中执行此操作?或者另外一个解决方法是挑选单词并给它们粗体属性而不将其分配给整个字符串?
它类似于这个问题,但我无法在textplot()中使用相同的技术: text()R函数 - 如何更改单个单词的字体?
text(0.5,0.5, expression(paste(bold("bold")," not bold")))
Run Code Online (Sandbox Code Playgroud)
这是我的代码,没有粗体术语.假装"定义"希望是大胆的面孔:
blurb<-strwrap("Definition: This is my text blurb",
width=60)
textplot(blurb, halign="left", valign="top", cex = 1, family="serif")
Run Code Online (Sandbox Code Playgroud)
我一直在玩破坏字符串并搜索一个函数,它将粗体面指定给"定义"部分,font = 2,然后将字符串粘贴在一起,但我很难过.我找不到要使用的功能:
blurb1<-"Definition" ##How to change to bold face??
blurb2<-"This is my text blurb"
blurb<-paste0(blurb1,blurb2)
Run Code Online (Sandbox Code Playgroud)
编辑:使用其他解决方案的主要障碍是,对于我的页面布局,text()并不完全可行.我希望找到一个解决方案,在textplot()内部或以可以传递给textplot()的方式编辑字符串.
我正在创建一些"报告卡",它将绘制用户数据并在图表旁边提供一段解释.不同的值会触发不同的textplot().我喜欢textplot(),因为它很容易用par(mfrow = c(4,2))放置,在不重叠其他绘图的情况下雕刻出一个单独的空间.我似乎无法在没有很多游戏定位的情况下工作text().