Expand / impute time series in R

Question

I have a time series that I require on a weekly basis, however I currently have the data on a quarterly basis. For example:

 R> test     
   Quarter       week