## Not run:
# transform_method <- function(df) df
# data <- data.frame(y = c(1, 2), x = c(0.1, 0.2))
# data_transformed <- transform_method(data)
# check_data_frame_throw_error(data_transformed, "transform_method")
# # NULL
# ## End(Not run)
Run the code above in your browser using DataLab