Hola,
Aproximación muy sencillita...con gráficos "base":
#-----------------
datIn <- read.csv("pec.csv", header = TRUE, sep = ";", dec = ",")
par(mfrow = c(2,1))
barplot(
datIn$frec
,las = 1
,col = "green"
,cex.axis = 0.7, col.axis = "red", font.axis = 2
,main = "Frequency"
)
box()
plot(
datIn$Share
,type = "b"
,col = "blue", bg = "blue", col.axis = "red", font.axis = 2
,cex = 0.7
,cex.axis = 0.7
,las = 1
,main = "Share", ylab = "", xlab = ""
,ylim = c(0, 1.10*max(datIn$Share))
)
#-----------------
Yo harÃa la representación por separado, mejor que un gráfico con doble
eje.
Pero si quieres hacer un gráfico de doble eje:
http://ellisp.github.io/blog/2016/08/28/dualaxes2
Y como referencia para hacer gráficos (en español):
https://www.amazon.es/Gráficos-EstadÃsticos-Castor-Guisande-González/dp/
8499692117/ref=sr_1_1?ie=UTF8&qid=1472845192&sr=8-1&keywords=graficos+en+R
<https://www.amazon.es/Gr%C3%A1ficos-Estad%C3%ADsticos-Castor-Guisande-Gonz%C3%A1lez/dp/8499692117/ref=sr_1_1?ie=UTF8&qid=1472845192&sr=8-1&keywords=graficos+en+R>
Nota: Si quieres incluir las horas minutos en el eje "X" de cualquiera de
los dos gráficos:
http://stackoverflow.com/questions/5182238/r-replace-x-
axis-with-own-values
Saludos,
Carlos Ortega
www.qualityexcellence.es
El 2 de septiembre de 2016, 20:25, Ruben Tobalina Ramirez <
lagrimaescrita en gmail.com> escribió:
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 muestra del data frame:
* hora frec Miles Share 1 20:22 87 1.016
13,0
2 20:23 123 1.031 13,33 20:24 153 1.048 13,5 4 20:25 192 1.165 15,0
5 20:26 175 1.239 15,8 6 20:27 225 1.331 17,0 *
He probado con *plot* y el parámetro *new* sin éxito, y ahora estaba
probando con *ggplot*:
*ggplot(ft, aes(ft[,2:3])) + geom_bar(aes(ft[,2]), colour="black", fill
= "orange") + geom_line(aes(x=ft$hora,y=ft[,3]), colour="black") *
Se me muestran las variables pero de forma incorrecta. ¿Alguna sugerencia?
De paso, me podéis indicar algún manual para aprender a realizar gráficos
con R?
Muchas gracias!
Un saludo!!!
--
Rubén.