tests/tests_interactive/!setup_interactive_tests.R

In tdanker/ephys2: Read, analyze and plot HEKA Patchmaster files

# copy all neccesary files for testing into the folder 
# this should be run once to prepare the folder 

library(rprojroot)
library(ephys2)
package_location <- rprojroot::find_package_root_file()
setwd(paste0(package_location, "/tests/tests_interactive"))
get_exampledata()



# function to remove all files (usefull for testing)
cleanup_exampledata <-function(){
  file.remove("2014-07-22_CHO hERG.dat")
  file.remove("VG_Blocker.dat")
  file.remove("VG_Blocker_1.xls")
  
  file.remove("CURSORS")
  file.remove("render_exp.R")
  file.remove("render_ser.R")
  rm("CURSORS")  
}