En este artículo, discutiremos cómo crear gráficos con fondo transparente en el lenguaje de programación R.
La tarea requerida se logrará usando la función theme() con los parámetros apropiados. función theme() utilizada para modificar la configuración del tema. Para visualizar realmente un fondo transparente, la imagen debe almacenarse como una imagen PNG, esto se puede hacer con la función ggsave().
Sintaxis: ggsave (parcela, nombre de archivo, bg)
Parámetro:
- parcela: parcela a guardar
- nombre de archivo: ruta del archivo
- bg: fondo
Cree una trama simple para la demostración:
R
library(ggplot2) function1<- function(x){x**2} function2<-function(x){x**3} function3<-function(x){x/2} function4<-function(x){2*(x**3)+(x**2)-(x/2)} df=data.frame(x=-2:2, values=c(function1(-2:2), function2(-2:2), function3(-2:2), function4(-2:2)), fun=rep(c("function1","function2", "function3","function4")) ) plt<-ggplot(df,aes(x,values,col=fun))+geom_line() ggsave(plt, filename = "output1.png")
Producción:
Método 1: Usar rect con theme()
En este enfoque, después de que la trama se haya creado normalmente, se le agrega la función theme() con el parámetro rect. Para rectificar, la función element_rect() se pasa con el relleno de parámetros establecido en transparente.
Sintaxis: tema(rect = element_rect(fill=”transparente”))
Ejemplo: Gráfico con fondo transparente
R
library(ggplot2) function1<- function(x){x**2} function2<-function(x){x**3} function3<-function(x){x/2} function4<-function(x){2*(x**3)+(x**2)-(x/2)} df=data.frame(x=-2:2, values=c(function1(-2:2), function2(-2:2), function3(-2:2), function4(-2:2)), fun=rep(c("function1","function2", "function3","function4")) ) plt<-ggplot(df,aes(x,values,col=fun))+geom_line()+ theme(rect = element_rect(fill = "transparent")) ggsave(plt, filename = "output.png", bg = "transparent")
Producción:
Método 2: configurar cada parámetro de tema por separado
Al configurar, los elementos de fondo para que sean transparentes, el fondo de un gráfico se puede hacer transparente.
Ejemplo: Gráfico con fondo transparente
R
library(ggplot2) function1<- function(x){x**2} function2<-function(x){x**3} function3<-function(x){x/2} function4<-function(x){2*(x**3)+(x**2)-(x/2)} df=data.frame(x=-2:2, values=c(function1(-2:2), function2(-2:2), function3(-2:2), function4(-2:2)), fun=rep(c("function1","function2", "function3","function4")) ) plt<-ggplot(df,aes(x,values,col=fun))+geom_line()+ theme(legend.background = element_rect(fill = "transparent"), legend.box.background = element_rect(fill = "transparent"), panel.background = element_rect(fill = "transparent"), panel.grid.major = element_blank(), panel.grid.minor = element_blank(), plot.background = element_rect(fill = "transparent", color = NA)) ggsave(plt, filename = "output1.png", bg = "transparent")
Producción:
Publicación traducida automáticamente
Artículo escrito por vanshikagoyal43 y traducido por Barcelona Geeks. The original can be accessed here. Licence: CCBY-SA