8 lines
172 B
R
8 lines
172 B
R
library(tidyverse)
|
|
getwd()
|
|
|
|
ggplot(diamonds, aes(x = carat, y = price)) +
|
|
geom_hex()
|
|
ggsave("diamonds.png")
|
|
dir.create("./data")
|
|
write_csv(diamonds, "data/diamonds.csv") |