if (FALSE) {
fp <- system.file("extdata", "lateformeeting.csv", package = "rrefine")
refine_upload(fp, project.name = "lfm")
refine_add_column(new_column = "date_type",
value = "grel:value.type()",
base_column = "theDate",
project.name = "lfm")
refine_add_column(new_column = "example_value",
new_column_index = 0,
value = "1",
project.name = "lfm")
}
Run the code above in your browser using DataLab