# NOT RUN {
data <- MASS::Cars93[1:20, c("Manufacturer", "Model", "Type", "MPG.city")]
## Add border beneath each unique group within a column on sort:
reactable(data,
pagination = FALSE,
rowStyle = group_border_sort("Manufacturer")
)
## Can specify up to 4 columns:
reactable(data,
pagination = FALSE,
rowStyle = group_border_sort(columns = c("Manufacturer","Model","Type"))
)
## Apply styles to the border:
reactable(data,
pagination = FALSE,
rowStyle = group_border_sort(columns = c("Manufacturer","Model","Type"),
border_color = "red",
border_style = "dashed",
border_width = "3px")
)
# }
Run the code above in your browser using DataLab