# NOT RUN {
# }
# NOT RUN {
# Simulate random data
GroupA <- rnorm(50)
GroupB <- rnorm(50)
RandomData <- data.frame(GroupA, GroupB)
rob <- lm(GroupA ~ GroupB, data = RandomData)
bob <- curve_gen(rob, "GroupB")
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab