如何在R闪亮的散点图上正确显示x变量

Question

我制作了一个带有散点图的R闪亮应用程序。但是x轴上的变量很长并且相互混合。如果我将它们倾斜45度，它们会占据绘图空间并使绘图变小。如何解决这个问题？

output$scatterplot <- renderPlot({
projects_selected_date <- data4 %>%
filter(Deployment.Month >= input$date[1] & Deployment.Month <= input$date[2])
q<-ggplot(projects_selected_date, aes_string(x=input$x ,y=input$y),colour= 'red')+ geom_point()
q + theme(axis.text.x = element_text(angle =45, vjust =0,hjust=0))})
[below image shows the plot with 45 degree]