Running examples in 'IncucyteDRC-Ex.R' failed
The error most likely occurred in:

> ### Name: calculateEC50
> ### Title: calculateEC50
> ### Aliases: calculateEC50
> 
> ### ** Examples
> 
> pm_file <- system.file(file='extdata/example.PlateMap', package='IncucyteDRC')
> test_pm <- importPlatemapXML(pm_file)
Importing platemap xml from D:/temp/RtmpIhP2PO/RLIBS_2bb1825394fb4/IncucyteDRC/extdata/example.PlateMap
Plate map import successful!
> data_file <- system.file(file='extdata/example_data.txt', package='IncucyteDRC')
> test_data <- importIncucyteData(data_file, metric='pc')
Getting pc data for plate example_data.txt from:
D:/temp/RtmpIhP2PO/RLIBS_2bb1825394fb4/IncucyteDRC/extdata/example_data.txt
> 
> test_list <- splitIncucyteDRCPlateData(test_pm, test_data, group_columns='growthcondition')
> 
> print(test_list)
## This is an IncucyteDRCSetList S3 object containing 4 IncucyteDRCSet objects
## Access using standard list notation ie my_list[[1]]
## Try lapply(my_list, print) to see more information on each object> 
> test_idrc_set <- fitGrowthCurvesGrouped(test_list[[2]])
> test_idrc_set <- fitGrowthCurvesIndividual(test_idrc_set)
> test_idrc_set <- calculateDRCData(test_idrc_set, cut_time=100)
Using cut time provided to function
> test_idrc_set <- fitDoseResponseCurve(test_idrc_set)
Error: Problem with `mutate()` input `idx`.
x could not find function "row_number"
i Input `idx` is `row_number()`.
i The error occured in group 1: sampleid = "PDD00017273", conc = 0.3703704.
Backtrace:
     x
  1. \-IncucyteDRC::fitDoseResponseCurve(test_idrc_set)
  2.   \-IncucyteDRC::exportDRCDataToDataFrame(idrc_set, include_control)
  3.     \-`%>%`(...)
  4.       +-base::withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  5.       \-base::eval(quote(`_fseq`(`_lhs`)), env, env)
  6.         \-base::eval(quote(`_fseq`(`_lhs`)), env, env)
  7.           \-IncucyteDRC:::`_fseq`(`_lhs`)
  8.             \-magrittr::freduce(value, `_function_list`)
  9.               \-function_list[[i]](value)
 10.                 +-dplyr::mutate(., idx = row_number())
 11.                 \-dplyr:::mutate.data.frame(., idx = row_number())
 12.                   \-dplyr:::mutate_cols(.data, ...)
<parent: error/simpleError>
Backtrace:
x
Execution halted