search for: lab_x_idx

Y bueno, algo más bonito sí que queda con ggplot... #--------------- datIn <- read.csv("pec.csv", header = TRUE, sep = ";", dec = ",") library(ggplot2) lab_x_idx <- c(1, round(nrow(datIn)/2, 0), nrow(datIn)) lab_x <- as.vector(datIn$hora[ lab_x_idx]) fre_gg <- ggplot( datIn, aes( x = 1:nrow(datIn), y = frec)) + geom_bar(stat = "identity") + xlab(paste("Rango horas: ", datIn$hora[1], "-", dat...

...cof en qualityexcellence.es> > escribió: > >> Y bueno, algo más bonito sí que queda con ggplot... >> >> #--------------- >> datIn <- read.csv("pec.csv", header = TRUE, sep = ";", dec = ",") >> >> library(ggplot2) >> lab_x_idx <- c(1, round(nrow(datIn)/2, 0), nrow(datIn)) >> lab_x <- as.vector(datIn$hora[ lab_x_idx]) >> fre_gg <- ggplot( datIn, aes( x = 1:nrow(datIn), y = frec)) + >> geom_bar(stat = "identity") + >> xlab(paste("Rango horas: &quot...

Buenas tardes, Tengo una duda con gráficos. Estoy intentando realizar el típico gráfico de una variable en histograma y otra en linea, supongo que será sencillo pero llevo unos días peleando y no me sale de forma correcta. Las variables están en un dataframe que muestran las frecuencias de tweets minuto a minuto y el share de esos minutos (os adjunto un archivo en csv con el dataframe). Una

...> escribió: >> >>> Y bueno, algo más bonito sí que queda con ggplot... >>> >>> #--------------- >>> datIn <- read.csv("pec.csv", header = TRUE, sep = ";", dec = ",") >>> >>> library(ggplot2) >>> lab_x_idx <- c(1, round(nrow(datIn)/2, 0), nrow(datIn)) >>> lab_x <- as.vector(datIn$hora[ lab_x_idx]) >>> fre_gg <- ggplot( datIn, aes( x = 1:nrow(datIn), y = frec)) + >>> geom_bar(stat = "identity") + >>> xlab(paste("Ra...