data(example_matrix)
test_data <- data.frame(
example_matrix[1:200, c(1, 7)],
c = c(
rep("c1", 40),
rep("c2", 40),
rep("c3", 40),
rep("c4", 40),
rep("c5", 40)
)
)
p1 <- plot_scatter(
test_data
)
p2 <- plot_scatter(
test_data,
marginal_type = "boxplot"
)
p1 + p2
p3 <- plot_scatter(
test_data,
facet = TRUE
)
p3
p4 <- plot_scatter(
test_data[, 1:2],
marginal_type = "histogram"
)
p4
Run the code above in your browser using DataLab