Remove hanging spaces

R/R/prophet.R

@@ -2,7 +2,7 @@
 ## All rights reserved.
 
 ## This source code is licensed under the BSD-style license found in the
-## LICENSE file in the root directory of this source tree. An additional grant 
+## LICENSE file in the root directory of this source tree. An additional grant
 ## of patent rights can be found in the PATENTS file in the same directory.
 
 ## Makes R CMD CHECK happy due to dplyr syntax below
@@ -468,7 +468,7 @@ logistic_growth_init <- function(df) {
 #'
 #' @param m Prophet object.
 #' @param df Data frame.
-#' @param ... Additional arguments passed to the \code{optimizing} or 
+#' @param ... Additional arguments passed to the \code{optimizing} or
 #'  \code{sampling} functions in Stan.
 #'
 #' @export
@@ -581,7 +581,7 @@ fit.prophet <- function(m, df, ...) {
 #' forecast <- predict(m, future)
 #' plot(m, forecast)
 #' }
-#' 
+#'
 #' @export
 predict.prophet <- function(object, df = NULL, ...) {
   if (is.null(df)) {

R/man/fit.prophet.Rd

@@ -11,7 +11,7 @@ fit.prophet(m, df, ...)
 
 \item{df}{Data frame.}
 
-\item{...}{Additional arguments passed to the \code{optimizing} or 
+\item{...}{Additional arguments passed to the \code{optimizing} or
 \code{sampling} functions in Stan.}
 }
 \description{

R/tests/testthat/test_prophet.R

@@ -33,7 +33,7 @@ test_that("fit_predict_no_changepoints", {
 test_that("fit_predict_changepoint_not_in_history", {
   skip_if_not(Sys.getenv('R_ARCH') != '/i386')
   train_t <- dplyr::mutate(DATA, ds=zoo::as.Date(ds))
-  train_t <- dplyr::filter(train_t, (ds < zoo::as.Date('2013-01-01')) | 
+  train_t <- dplyr::filter(train_t, (ds < zoo::as.Date('2013-01-01')) |
                                 (ds > zoo::as.Date('2014-01-01')))
   future <- data.frame(ds=DATA$ds)
   m <- prophet(train_t, changepoints=c('2013-06-06'))