小编MSJ*_*MSJ的帖子

这是问题:我ggplot用来制作一个图表,其中x轴的范围是-90到90度.我已成功使用函数将度数符号添加到创建的刻度标签中by scale_x_continuous.但是,当我使用调整字体面时theme(),刻度标签不会变为粗体.但是,更改字体大小是有效的.这是一个可重复的例子:

# function to add degree symbols
add_degree <- function(x) {
  parse(text = paste(x, "*degree",sep = ""))
}

y<- c(0.00552243346007605, 0.00553155893536122, 0.005693536121673, 
        0.0054722433460076, 0.00562661596958175, 0.00546768060836502, 
        0.00561292775665399, 0.00550950570342205, 0.0056851711026616, 
        0.00551558935361217, 0.0055041825095057, 0.00556501901140684, 
        0.00552699619771863, 0.00552623574144487, 0.0055680608365019, 
        0.00567148288973384, 0.00550342205323194, 0.00553764258555133, 
        0.00538098859315589, 0.00573307984790875, 0.00564486692015209, 
        0.00561444866920152, 0.00556349809885932, 0.00571254752851711, 
        0.00544030418250951, 0.00557946768060837, 0.00546083650190114, 
        0.00549049429657795, 0.00557414448669202, 0.00553916349809886, 
        0.00551787072243346, 0.00557794676806084, 0.0055041825095057, 
        0.00552699619771863, 0.0056509505703422, 0.00544790874524715, 
        0.00555555555555556)

x <- seq(-90,90,by = 5)
dat <- data.frame(x,y)
ggplot(dat,aes(x = x, y = y))+
  geom_line()+
  scale_x_continuous(limits = …

我目前正在使用创建几个箱线图ggplot2。每个箱线图都显示相似的数据，但离散 x 轴和连续 y 轴的范围并不总是相同。一些箱线图只有两个离散的 x 值，其他箱线图有三个或五个。另外，连续y轴的范围差异很大；有些范围是 0-80，其他范围是 0-2.5。

理想情况下，我希望得到以下输出：对于每个图形，所有 y 轴都应该具有相同的绝对长度，并且沿 x 轴的每个离散“步骤”也应该具有相同的绝对长度。

我使用条形图而不是箱形图创建了一个简单的示例来显示问题：

library(ggplot2)
library(grid)
x1 <- factor(c('a','b','c','d','e'))
y1 <- c(10,20,50,60,80)
df1 <- data.frame(x1,y1)

x2 <- factor(c('a','b'))
y2 <- c(2,3.5)
df2 <- data.frame(x2,y2)

g1 <- ggplot(df1, aes(x = x1, y = y1)) +
  geom_bar(stat='identity')

g2 <- ggplot(df2, aes(x=x2,y=y2)) +
  geom_bar(stat='identity')

grid.newpage()
pushViewport(viewport(layout = grid.layout(2, 1)))   
print(g1, vp = viewport(layout.pos.row = 1, layout.pos.col = 1))         
print(g2, vp = viewport(layout.pos.row = 2, layout.pos.col = …