# NOT RUN {
assert_is_installed("fgeo.x")
tt_result <- tt_test(fgeo.x::tree6_3species, fgeo.x::habitat)
summary(tt_result)
# Same
summary(as_tibble(tt_result))
# You may want to add the explanation to the result of `tt_test()`
dplyr::left_join(as_tibble(tt_result), summary(tt_result))
# You may prefer a wide matrix
Reduce(rbind, tt_result)
# You may prefer a wide dataframe
tidyr::spread(summary(tt_result), "habitat", "association")
# }
Run the code above in your browser using DataLab