Recently Published
Plot # install.packages("ggplot2") library(ggplot2)
# install.packages("ggplot2")
library(ggplot2)
# Datos
set.seed(1)
df <- data.frame(x = rnorm(200), y = rnorm(200))
ggplot(df, aes(x = x, y = y)) +
geom_density_2d_filled() +
geom_density_2d(colour = "black")
Plot # install.packages("ggplot2") library(ggplot2)
# install.packages("ggplot2")
library(ggplot2)
# Datos
set.seed(1)
df <- data.frame(x = rnorm(200), y = rnorm(200))
ggplot(df, aes(x = x, y = y)) +
geom_density_2d_filled(alpha = 0.75)
Plot # install.packages("ggplot2") library(ggplot2)
# install.packages("ggplot2")
library(ggplot2)
# Datos
set.seed(1)
df <- data.frame(x = rnorm(200), y = rnorm(200))
ggplot(df, aes(x = x, y = y)) +
geom_density_2d_filled() +
scale_fill_brewer()
Plot # install.packages("ggplot2") library(ggplot2) # Datos set.seed(1) df <- data.frame(x = rnorm(200), y = rnorm(200)) ggplot(df, aes(x = x, y = y)) + geom_density_2d_filled()
# install.packages("ggplot2")
library(ggplot2)
# Datos
set.seed(1)
df <- data.frame(x = rnorm(200), y = rnorm(200))
ggplot(df, aes(x = x, y = y)) +
geom_density_2d_filled()
Plot # install.packages("ggplot2") library(ggplot2)
# install.packages("ggplot2")
library(ggplot2)
# Datos
set.seed(1)
df <- data.frame(x = rnorm(200), y = rnorm(200))
ggplot(df, aes(x = x, y = y, fill = ..level..)) +
stat_density_2d(geom = "polygon")
Plot # install.packages("ggplot2") library(ggplot2)
# install.packages("ggplot2")
library(ggplot2)
# Datos
set.seed(1)
df <- data.frame(x = rnorm(200), y = rnorm(200))
ggplot(df, aes(x = x, y = y)) +
geom_density_2d(aes(color = ..level..)) +
scale_color_viridis_c()
Plot # install.packages("ggplot2") library(ggplot2)
# install.packages("ggplot2")
library(ggplot2)
# Datos
set.seed(1)
df <- data.frame(x = rnorm(200), y = rnorm(200))
ggplot(df, aes(x = x, y = y)) +
geom_density_2d(aes(color = ..level..))