R语言 hjust = 0, vjust = 1属性设置

4 篇文章 0 订阅
1 篇文章 0 订阅

The value of hjust and vjust are only defined between 0 and 1:
(hjust 和 vjust的值限定在0-1)

0 means left-justified(0表示左适应)
1 means right-justified(1表示右适应)
Source: ggplot2, Hadley Wickham, page 196
(资料来源于ggplot2, Hadley Wickham, page 196)

hjust controls horizontal justification and vjust controls vertical justification.
(hjust 控制horizontal横轴 , vjust控制vertical纵轴 )

An example should make this clear(举个例子来说明下):

td <- expand.grid(
    hjust=c(0, 0.5, 1),
    vjust=c(0, 0.5, 1),
    angle=c(0, 45, 90),
    text="text"
)

ggplot(td, aes(x=hjust, y=vjust)) + 
    geom_point() +
    geom_text(aes(label=text, angle=angle, hjust=hjust, vjust=vjust)) + 
    facet_grid(~angle) +
    scale_x_continuous(breaks=c(0, 0.5, 1), expand=c(0, 0.2)) +
    scale_y_continuous(breaks=c(0, 0.5, 1), expand=c(0, 0.2))

这里写图片描述

To understand what happens when you change the hjust in axis text, you need to understand that the horizontal alignment for axis text is defined in relation not to the x-axis, but to the entire plot (where this includes the y-axis text). (This is, in my view, unfortunate. It would be much more useful to have the alignment relative to the axis.)
(想要理解当你改变hjust时对图像的影响,你需要明白在axis text中,horizontal alignment是针对整个plot而不是x-axis)

DF <- data.frame(x=LETTERS[1:3],y=1:3)
p <- ggplot(DF, aes(x,y)) + geom_point() + 
    ylab("Very long label for y") +
    opts(axis.title.y=theme_text(angle=0))


p1 <- p + opts(axis.title.x=theme_text(hjust=0)) + xlab("X-axis at hjust=0")
p2 <- p + opts(axis.title.x=theme_text(hjust=0.5)) + xlab("X-axis at hjust=0.5")
p3 <- p + opts(axis.title.x=theme_text(hjust=1)) + xlab("X-axis at hjust=1")

library(ggExtra)
align.plots(p1, p2, p3)

这里写图片描述
To explore what happens with vjust aligment of axis labels:
(来看看改变vjust产生的影响)

DF <- data.frame(x=c("a\na","b","cdefghijk","l"),y=1:4)
p <- ggplot(DF, aes(x,y)) + geom_point()

p1 <- p + opts(axis.text.x=theme_text(vjust=0, colour="red")) + 
        xlab("X-axis labels aligned with vjust=0")
p2 <- p + opts(axis.text.x=theme_text(vjust=0.5, colour="red")) + 
        xlab("X-axis labels aligned with vjust=0.5")
p3 <- p + opts(axis.text.x=theme_text(vjust=1, colour="red")) + 
        xlab("X-axis labels aligned with vjust=1")


library(ggExtra)
align.plots(p1, p2, p3)

这里写图片描述

&:色、线 和 点
这里写图片描述

这是一个使用 ggplot2 库创建的示例图形。如果你想将它为 PDF 文件,可以使用以下步骤: 1. 创建一个新的 PDF 设备,并设置它的宽度和高度。 ```R pdf("plot4.pdf", width = 8, height = 6) ``` 上述代码将创建一个名为 "plot4.pdf" 的 PDF 文件,并设置它的宽度为 8 英寸,高度为 6 英寸。你可以根据需要调整这些尺寸。 2. 绘制图形。 ```R plot4 ``` 3. 关闭 PDF 设备,保存文件。 ```R dev.off() ``` 完整的代码示例: ```R library(ggplot2) # 创建一个示例数据框 sums <- data.frame( rownames = c("Feeling1", "Feeling2", "Feeling3"), element_counts1 = c(100, 200, 300), element_counts2 = c(150, 250, 350), element_counts3 = c(200, 300, 400), element_counts4 = c(250, 350, 450), Total = c(700, 1100, 1500) ) # 创建图形 plot4 <- ggplot(sums, aes(x = rownames, y = sum(element_counts1, element_counts2, element_counts3, element_counts4))) + geom_bar(stat = "identity", fill = "pink") + geom_text(aes(label = Total), vjust = -0.5) + xlab("feeling") + ylim(200, 700) + ylab("counting") + ggtitle("Feeling-Counting_1") + theme(axis.text.x = element_text(angle = 45, hjust = 1), plot.title = element_text(hjust = 0.5)) # 创建 PDF 设备 pdf("plot4.pdf", width = 8, height = 6) # 绘制图形 plot4 # 关闭 PDF 设备 dev.off() ``` 当运行上述代码后,你将得到一个名为 "plot4.pdf" 的 PDF 文件,其中包含你的图形。你可以根据需要调整 PDF 文件的尺寸和图形的样式。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值