web-dev-qa-db-fra.com

ggplot2 supprime l'étiquette d'axe

J'ai le jeu de données suivant:

dput(head(active_clients))
structure(list(Date = structure(c(1422662400, 1425081600, 1427760000, 
1430352000, 1433030400, 1435622400), class = c("POSIXct", "POSIXt"
), tzone = "UTC"), value = c(65139, 66615, 66669, 67081, 67277, 
67366), month = 1:6, year = c(2015L, 2015L, 2015L, 2015L, 2015L, 
2015L), year_month = c("1/15", "2/15", "3/15", "4/15", "5/15", 
"6/15"), year2 = c("15", "15", "15", "15", "15", "15")), .Names = c("Date", 
"value", "month", "year", "year_month", "year2"), row.names = c(NA, 
-6L), class = c("tbl_df", "tbl", "data.frame"))

Et je trace le graphique de ligne/point suivant avec ggplot2.

t <- ggplot(active_clients)  +
  geom_point(aes(as.factor(year_month), 
                 value), 
             size = 2, 
             color="deepskyblue4") +
  geom_line(aes(as.factor(year_month), 
                value,
                group = 1, alpha = 0.5), 
            color = "deepskyblue4") +

  xlab("") + 
  ylab("") +
  theme(legend.title = element_blank()) +
  theme_minimal()

ggplotly(t)

Mais je n'arrive pas à supprimer les étiquettes de l'axe des x.

J'ai également essayé d'ajouter:

theme(legend.title = element_blank(), axis.text = element_blank())

Je ne sais pas ce que je fais mal.

Des indices?

Mise à jour

Voici l'intrigue que j'obtiens:

enter image description here

5
Prometheus

Pour supprimer les étiquettes de l'axe des x, vous devez essayer d'utiliser axis.text.x=element_blank() dans theme()

Suppression des étiquettes de l'axe des x:

ggplot(active_clients)  +
  geom_point(aes(as.factor(year_month), value), size = 2, color="deepskyblue4") +
  geom_line(aes(as.factor(year_month), value, group = 1, alpha = 0.5), color = "deepskyblue4") +
  theme_minimal()+
  theme(axis.text.x=element_blank())

enter image description here

7
Prradep

Que diriez-vous de supprimer l'étiquette de l'axe des x et de l'enregistrer en tant qu'objet ggplot. Par la suite, enroulez-le autour de ggplotly et il devrait faire l'affaire. Un exemple reproductible minimum est le suivant;

library(plotly)
library(ggplot2)
# create a ggplot object and remove the x-axis label
bp <- ggplot(PlantGrowth, aes(x=group, y=weight)) + 
  geom_boxplot()+
  theme(axis.title.x=element_blank(), axis.text.x=element_blank(),
                      axis.ticks.x=element_blank())
# show the ggplot
bp
# create a ggplotly object from the ggplot object
p<- ggplotly(bp)
# show the ggplotly object
p

enter image description here

Je pense que cela répond clairement à votre question.

3
mnm