title: Get beginning of next quarter from current Date in R
body: <p>I am trying to get beginning of next quarter from the current date. </p>
  
  <pre><code>library(lubridate)
  current_date = Sys.Date()
  quarter(Sys.Date(), with_year= TRUE) 
  </code></pre>
  
  <p>or from the function  <code>quarters.Date(Sys.Date())</code>I could get quarter. I could not add quarter to the above code . </p>
  
  <p>Are there are any other packages I can use or any other function in the default packages to do this?</p>