En el pasado, he sido capaz de crear diagtwigs de caja usando ggplot2 al proporcionar el bigote inferior, el cuantil inferior, la mediana, el cuantil superior y el bigote superior junto con las tags del eje x. Por ejemplo: DF <- data.frame(x=c("A","B"), min=c(1,2), low=c(2,3), mid=c(3,4), top=c(4,5), max=c(5,6)) ggplot(DF, aes(x=x, y=c(min,low,mid,top,max))) + geom_boxplot() haría un diagtwig […]
A menudo trazo gráficos en GNU R / ggplot para algunas medidas relacionadas con los bytes. Las tags del eje incorporado son números simples o notación científica, es decir 1 megabyte = 1e6. Me gustaría prefijos SI (Kilo = 1e3, Mega = 1e6, Giga = 1e9, etc.) en su lugar, es decir, el eje debería […]
Como ggplot2 produce bonitos gráficos de colores, pero a veces se requiere tener gráficos en blanco y negro con rellenos de patrón . Me pregunto cómo hacer esto en ggplot2 , digamos para este código: ggplot(diamonds, aes(cut, fill=cut)) + geom_bar() Editar ¿Hay alguna función en R para hacer rellenos de patrón para gráficos?
Estoy tratando de trazar gráficos de barras verticales sobre un mapa. Revisé ejemplos en línea pero de alguna manera no pude. Mis datos se encuentran actualmente en este formato: University| Count | Category | lat | long Aquí está el código que bash ejecutar: library(ggplot2) library(ggmap) library(ggsubplot) df1 <- data.frame( University = c(rep("University1", 4), rep("University2", […]
Tengo una muestra de 1 millón de registros obtenidos de mis datos originales. (Para su referencia, puede usar estos datos ficticios que pueden generar una distribución similar b <- data.frame(matrix(rnorm(2000000, mean=c(8,17), sd=2))) c <- b[sample(nrow(b), 1000000), ] ) Creí que el histogtwig era una mezcla de dos distribuciones logarítmicas normales e intenté ajustar las distribuciones […]
¿Cómo debo cambiar el tamaño de los símbolos en las leyendas? Revisé el documento del theme pero no encontré respuesta. Aquí hay un ejemplo: library(ggplot2);library(grid) set.seed(1000) x <- 1:6 mu <- sin(x) observed <- mu + rnorm(length(x), 0, 0.5*sd(mu)) data <- data.frame( t=rep(x, 2), value=c(mu, observed) – min(mu, observed) + 0.5, class = rep(c("mu", "observed"), […]
¿Hay alguna manera de obtener el ancho del área de trazado en la ventana de la cuadrícula? Crece o se reduce, por ejemplo, si el plot.margin se cambia o si aumenta el tamaño de fuente de las tags del eje y. ¿Está escondido en algún lugar de str(p) ? Cualquier medida de tamaño funcionaría. Necesito […]
A continuación se muestra el código de ejemplo de un diagtwig que hace casi exactamente lo que quiero. Lo único que quiero agregar son marcas de graduación en el eje x (el mismo tamaño que los tics principales) de acuerdo con minor_breaks definidos a continuación. df <- data.frame(x = c(1900,1950,2000), y = c(50,75,60)) p <- […]
La siguiente es una situación: group1 <- seq(1, 10, 2) group2 <- seq(1, 20, 3) x = c(group1, group2) mydf <- data.frame (X =x , Y = rnorm (length (x),5,1), groups = c(rep(1, length (group1)), rep(2, length(group2)))) ggplot(mydf, aes(X, Y, group= groups)) + geom_point()+ facet_grid (.~ group) Diferentes facetas son escaladas por x límites en […]
Tengo un ggplot donde estoy mapeando factores para llenar y alfa, así: set.seed(47) the_data <- data.frame(value = rpois(6, lambda=20), cat1 = rep(c("A", "B"), each = 3), cat2 = rep(c("X", "Y", "Z"), 2)) ggplot(the_data, aes(y = value, x = cat2, alpha = cat1, fill = cat2)) + geom_bar(stat = "identity", position = "dodge") + scale_alpha_discrete(range = […]