Articles of r

Agregar marcas secundarias al eje x en ggplot2 (sin tags)

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 <- […]

diferentes tamaños de facetas proporcionales del eje x en ggplot 2 r

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 […]

Eliminar paréntesis y texto dentro de cadenas en R

En R, tengo una lista de compañías tales como: companies <- data.frame(Name=c("Company A Inc (COMPA)","Company B (BEELINE)", "Company C Inc. (Coco)", "Company D Inc.", "Company E")) Quiero eliminar el texto con paréntesis, que termina con la siguiente lista: Name 1 Company A Inc 2 Company B 3 Company C Inc. 4 Company D Inc. 5 […]

Cuente el número de ceros por fila y elimine las filas con más de n ceros

Tengo una pregunta sobre contar los ceros por fila. Tengo un dataframe como este: a = c(1,2,3,4,5,6,0,2,5) b = c(0,0,0,2,6,7,0,0,0) c = c(0,5,2,7,3,1,0,3,0) d = c(1,2,6,3,8,4,0,4,0) e = c(0,4,6,3,8,4,0,6,0) f = c(0,2,5,5,8,4,2,7,4) g = c(0,8,5,4,7,4,0,0,0) h = c(1,3,6,7,4,2,0,4,2) i = c(1,5,3,6,3,7,0,5,3) j = c(1,5,2,6,4,6,8,4,2) DF<- data.frame(a=a,b=b,c=c,d=d,e=e,f=f,g=g,h=h,i=i,j=j) abcdefghij 1 1 0 0 1 0 0 0 […]

dplyr :: mutate para agregar valores múltiples

Hay un par de cuestiones sobre esto en el repository Dplyr Github , y al menos una pregunta SO relacionada, pero ninguna de ellas cubre mi pregunta, creo. Agregar varias columnas en una llamada de mutación dplyr es más o menos lo que quiero, pero hay una respuesta de caso especial para ese caso ( […]

¿Cómo agregar llaves a un gráfico?

Quiero hacer el siguiente gráfico en R: ¿Cómo puedo trazar esas llaves horizontales?

Haz una leyenda rectangular, con filas y columnas etiquetadas, en grilla

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 = […]

Problema con ggplot2, geom_bar y position = “dodge”: astackdo tiene valores de y correctos, esquivado no

Tengo bastante tiempo para entender geom_bar() y position=”dodge” . Estaba tratando de hacer algunos gráficos de barras que ilustran dos grupos. Originalmente, los datos eran de dos marcos de datos separados. Por esta pregunta , puse mis datos en formato largo. Mi ejemplo: test <- data.frame(names=rep(c("A","B","C"), 5), values=1:15) test2 <- data.frame(names=c("A","B","C"), values=5:7) df <- data.frame(names=c(paste(test$names), […]

R tm package vcorpus: Error al convertir un corpus en un dataframe

Estoy usando el paquete tm para limpiar algunos datos usando el siguiente código: mycorpus <- Corpus(VectorSource(x)) mycorpus <- tm_map(mycorpus, removePunctuation) Luego quiero convertir el corpus en un dataframe para exportar un archivo de texto que contiene los datos en el formato original de un dataframe. He probado lo siguiente: dataframe <- as.data.frame(mycorpus) Pero esto devuelve […]

Extracción de filas únicas de una tabla de datos en R

Estoy migrando desde marcos de datos y matrices a tablas de datos, pero no he encontrado una solución para extraer las filas únicas de una tabla de datos. Supongo que hay algo que me falta sobre la notación [,J] , aunque todavía no he encontrado una respuesta en las preguntas frecuentes y las viñetas introductorias. […]