Как удалить метки осей X и Y из прямоугольника в R? - PullRequest
Новая
       7

Как удалить метки осей X и Y из прямоугольника в R?

0 голосов
/ 22 сентября 2019

Я писал некоторый код для класса, и я застрял в том, как удалить метки x и y из коробки.Я планирую разместить его в 1-м графике, чтобы они были избыточными.

Если кто-то также знает, как добавить линию в 0 к моему линейному графику, это было бы замечательно!

Код: 

#load data up 
library(readxl)
TempData <- read_excel("R Data/TempData.xlsx")
View(TempData)

#initiliase relevant packages #ggplot2 for creating data visulation and viridis to allow for colour gradients
library(ggplot2)
library(viridis)

#plot line graph
g1 <- ggplot(TempData, aes(x = Year, y = GAT, color = GAT)) +
  geom_line(size = 1.5)  +
  geom_smooth(method=loess, se=TRUE, col = "black") +
  scale_colour_gradient2(low = "green", mid = "yellow" , high = "red", midpoint=median(TempData$GAT)) +
  labs(title = "Global Average Temperature", subtitle = "From 1850 to 2018") +
  xlab("Year") +  ylab ("Average Temperature") +
  theme(plot.title = element_text(face = "bold", hjust = 0.5, size = 16)) +
  theme(plot.subtitle = element_text(face = "italic", hjust = 0.5, size = 10, colour = "Orange")) +
  theme_light()

plot(g1)

#plot boxplot
g2 <- ggplot(TempData, aes(x="Year", y=TempData$GAT)) + geom_boxplot(outlier.colour = "red", outlier.fill = "red",outlier.shape = 21, outlier.size = 1)
labs(x=" ", y=" ") +
  stat_summary(fun.y = mean, geom = "point", size = 2.5, colour = "orange") +
  theme_light()

plot(g2)

#arrange two graphs to boxplot sits in top corner of line graph
g1 + annotation_custom(ggplotGrob(g2), xmin = 1840, xmax = 1930, ymin = 0.20, ymax = 0.88)

1 Ответ

0 голосов
/ 22 сентября 2019

вы можете использовать theme следующим образом: 

... + theme(axis.title.x=element_blank(), axis.title.y=element_blank())

Это удалит метки x, y на графике

...