Articles of ggplot2

R Trazando bandas de confianza con ggplot

Me gustaría crear una banda de confianza para un modelo equipado con GLS como este: require(ggplot2) require(nlme) mp <-data.frame(year=c(1990:2010)) mp$wav <- rnorm(nrow(mp))*cos(2*pi*mp$year)+2*sin(rnorm(nrow(mp)*pi*mp$wav))+5 mp$wow <- rnorm(nrow(mp))*mp$wav+rnorm(nrow(mp))*mp$wav^3 m01 <- gls(wow~poly(wav,3), data=mp, correlation = corARMA(p=1)) mp$fit <- as.numeric(fitted(m01)) p <- ggplot(mp, aes(year, wow))+ geom_point()+ geom_line(aes(year,fit)) p Esto solo traza los valores ajustados y los datos, y me gustaría […]

gráfico de densidad bidireccional combinado con gráfico de densidad unidireccional con regiones seleccionadas en r

# data set.seed (123) xvar <- c(rnorm (1000, 50, 30), rnorm (1000, 40, 10), rnorm (1000, 70, 10)) yvar <- xvar + rnorm (length (xvar), 0, 20) myd <- data.frame (xvar, yvar) # density plot for xvar upperp = 80 # upper cutoff lowerp = 30 # lower cutoff x <- myd$xvar plot(density(x)) dens <- […]

Cómo anotar muy bien un ggplot2 (manual)

Usando ggplot2 normalmente uso geom_text y algo así como position=jitter para anotar mis gráficos. Sin embargo, para una buena ttwig a menudo me parece que vale la pena anotar manualmente. como abajo: data2 <- structure(list(type = structure(c(5L, 1L, 2L, 4L, 3L, 5L, 1L, 2L, 4L, 3L, 5L, 1L, 2L, 4L, 3L, 5L, 1L, 2L, 4L, […]

¿Cómo hacer gráficos con fondo transparente en R usando ggplot2?

Necesito mostrar gráficos ggplot2 de R a archivos PNG con fondo transparente. Todo está bien con gráficos R básicos, pero sin transparencia con ggplot2: d <- rnorm(100) #generating random data #this returns transparent png png('tr_tst1.png',width=300,height=300,units="px",bg = "transparent") boxplot(d) dev.off() df <- data.frame(y=d,x=1) p <- ggplot(df) + stat_boxplot(aes(x = x,y=y)) p <- p + opts( panel.background […]

Ignorar los valores atípicos en gplplot2 boxplot

¿Cómo ignoraría los valores atípicos en ggplot2 boxplot? No quiero simplemente que desaparezcan (es decir, outlier.size = 0), pero quiero que se ignoren de manera que el eje y se escale para mostrar el percentil 1º / 3º. Mis valores atípicos están causando que la “caja” se reduzca tan pequeña que prácticamente es una línea. […]

Genera gráficos de barras astackdas emparejadas en ggplot (usando position_dodge solo en algunas variables)

Espero usar ggplot2 para generar un conjunto de barras astackdas en pares, muy parecido a esto: Con los siguientes datos de ejemplo: df <- expand.grid(name = c("oak","birch","cedar"), sample = c("one","two"), type = c("sapling","adult","dead")) df$count <- sample(5:200, size = nrow(df), replace = T) Me gustaría que el eje x representara el nombre del árbol, con dos […]

¿Es posible definir el rango “medio” en scale_fill_gradient2 ()?

Estoy creando un mapa de calor usando ggplot() , y me gustaría utilizar el esquema de 3 colores de scale_fill_gradient2() . He encontrado, sin embargo, que el color del medio es demasiado amplio y tiende a mostrar algunos de mis datos de forma negativa (usando “negro”, por ejemplo). ¿Es posible definir el rango que se […]

¿Cómo mostrar solo una parte del área de trazado de ggplot polar con faceta?

Suponer que hay un conjunto de datos en coordenadas polares que se trazará como sector library(ggplot2) library(reshape2) data <- melt(matrix(rnorm(1000), nrow = 20)) data$type <- 1:2 data$Var1 <- data$Var1*6 – 60 ggplot(data, aes(Var1, Var2)) + geom_tile(aes(fill = value)) + coord_polar(theta = "x", start = pi) + scale_x_continuous(limits = c(-180, 180)) + facet_wrap(~type) que da el […]

Modificar las tags del eje x en cada faceta

Tengo este cuadro: me gustaría agregar a cada etiqueta el texto N=xx para indicar el número de observaciones. Sé cómo hacer esto y lo he hecho en gráficos sin facetas. Cuando probé eso en el gráfico facetado, no funcionó (obtuve el mismo N en la marca abierta en los 3 gráficos, el mismo N en […]

Cómo rellenar geom_polygon con diferentes colores por encima y por debajo de y = 0?

Teniendo en cuenta el siguiente diagtwig de polígono: ggplot(df, aes(x=year,y=afw)) + geom_polygon() + scale_x_continuous(“”, expand=c(0,0), breaks=seq(1910,2010,10)) + theme_bw() Sin embargo, quiero llenar esto con dos colores diferentes. Por ejemplo, rojo para las áreas negras por encima de 0 y azul para las áreas negras por debajo de 0 . Desafortunadamente, usar fill=col no llena las […]