title: bdscale::scale_x_bd - how to remove x-axis label as a result of this function
body: <p>I am using <code>scale_x_bd</code>to pretty-up my x-axis. However, it generates an annoying "date" label on the axis. How do I get rid of this.</p>
  
  <p>My sample code:</p>
  
  <pre><code>library(lubridate)
  library(tidyverse)
  library(bdscale)
  
  
  s1_date &lt;- dmy("30/09/2019")
  s2_date &lt;- dmy("07/10/2019")
  
  
  df &lt;- data.frame(date = c(seq(s1_date, s1_date + 4, by = "day"), seq(s2_date, s2_date + 4, by = "day")),
             value = sample(1:25, 10)) 
  
  p1 &lt;- df %&gt;% 
    ggplot(aes(x = date, y = value)) + 
    geom_col() +
    labs(x = "", y = "") 
  
  
  p1 + scale_x_bd(business.dates = df %&gt;% pull(date) %&gt;% 
                 unique %&gt;% sort, max.major.breaks = 15) 
  
  #does not work
  p1 + scale_x_bd(business.dates = df %&gt;% pull(date) %&gt;% 
                    unique %&gt;% sort, max.major.breaks = 15) +
    xlab("")
  </code></pre>
  
  <p>Any ideas?</p>