Hi, @siddharthprabhu your SO solution doesn't work:
library(tidyverse)
fun <- function(slice, keys) {
broom::tidy(lm(Petal.Length ~ Sepal.Length, data = slice))
}
x <- iris %>%
group_by(Species) %>%
group_modify(fun)
options(pillar.sigfig = 4)
tb <- tibble(x=x)
tb
Still in p.value column there is a scientific notation visible.
