ggplot2中设置标签刻度的粗细和长度

001、使用绘制散点图进行测试。

a、直接绘制散点图

x <- 1:10
y <- seq(1, 1000, 100)
dat <- data.frame(x, y)                    ## 生成测试数据
ggplot(dat, aes(x, y)) + geom_point()      ## 直接绘制散点图

绘图结果如下：

b、修改x轴刻度线的粗细

x <- 1:10
y <- seq(1, 1000, 100)
dat <- data.frame(x, y)                       ## 保持测试数据不变                   
ggplot(dat, aes(x, y)) + geom_point() + 
theme(axis.ticks.x = element_line(colour = "black", size = 3)) ## 修改刻度线的粗细size = 3

绘图结果如下：

 c、修改x轴刻度线的长度

x <- 1:10
y <- seq(1, 1000, 100)
dat <- data.frame(x, y)                                  ## 保持测试数据不变
ggplot(dat, aes(x, y)) + geom_point() + 
  theme(axis.ticks.x = element_line(colour = "black", size = 3,
                                    lineend =20))        ## 修改x轴刻度线标签的长度

绘图结果如下：