check() error, play_manual_tour()

[nspyrison]

\dontrun{} and commenting did not remove the error.

check() error. I assume this is a run time duration error on play_tour_path().

> checking examples ... ERROR
  Running examples in 'spinifex-Ex.R' failed
  The error most likely occurred in:
  
  > base::assign(".ptime", proc.time(), pos = "CheckExEnv")
  > ### Name: play_tour_path
  > ### Title: Render display of a provided tour path
  > ### Aliases: play_tour_path
  > 
  > ### ** Examples
  > 
  > flea_std <- rescale(tourr::flea[,1:6])
  > tpath    <- save_history(flea_std, guided_tour(cmass))
  Error in index_f(as.matrix(data) %*% proj) : 
    unused argument (as.matrix(data) %*% proj)
  Calls: save_history -> tour -> tour_path -> generator -> index
  Execution halted

[nspyrison]

Note that this is going out to tourr::save_history() I wonder if giving an internally generated path would help?

[nspyrison]

recoded from save_history example, commented out 2nd example. check() is passing!