ggplot2精细化调整坐标轴
发布时间:2023-08-19 18:39:35 来源:哔哩哔哩


(资料图)

## 调整坐标轴范围```{r}p <- ggplot(mtcars, aes(wt, drat,col=cyl)) + geom_point()pp+xlim(0,20)p + scale_x_continuous(limits = c(0,15)) ```## 坐标轴标签```{r}p + xlab("这是 X 轴") + ylab("这是 Y 轴") + ggtitle("这是标题")  p + labs(x = "这是 X 轴", y = "这是 Y 轴", title = "这是标题")  #### 修改 X 轴标签的大小、字体、颜色、加粗、位置、角度 windowsFonts(wlbb = windowsFont("仿宋"))p + xlab("这是 X 轴") + theme( = element_text(size = 15, family = 'wlbb', color = "red", face = "bold", vjust = , hjust = , angle = 45))```## 标签特殊字符```{r}p+scale_x_continuous(labels = scales::label_number(accuracy = ))p+scale_x_continuous(labels = scales::label_number(accuracy = ,suffix = "wlbb"))p+scale_x_continuous(labels = scales::label_number(accuracy = ,suffix = "\u00b0C"))p+scale_x_continuous(labels = scales::label_number(accuracy = 1,suffix = "\u2764 五柳冰冰"))+  theme( = element_text(angle = 45,color = "red"))```## 刻度间隔```{r}p + scale_x_continuous(breaks=seq(0, 20, ))   ## X 轴每隔 .5 个单位显示一个刻度```## 删去所有刻度标签```{r}p+theme( = element_blank())   ## 删去所有刻度标签``````{r}p+theme( = element_blank())   ## 删去所有刻度线```## 日期型数据坐标轴```{r}p <- pedquant::md_future('rb2310')[[1]] %>% ggplot(aes(date,close))+  geom_line()pp+scale_x_date(breaks = '2 month',date_labels = "%y 年 %b")```

标签: