[R-es] Ayuda con gráfico típico de histograma más linea

[Ruben Tobalina Ramirez]

Perdón por el email anterior, se me ha escapado el enter.

Como decía, no buscaba ordenadores con linux instalado, que en realidad me
da igual porque lo instalo yo a mi gusto, sino que tuviesen hardware
adecuado. Por ejemplo, he comprobado que las tarjetas nvidia que aunque lo
nieguen no suelen ir del todo bien y además no la necesito. Y sobretodo, mi
pregunta iba por recomendación de marcas, que mi economia es escasa y
cuando me compro un pc pretendo alargar su uso lo máximo posible.

Bueno, gracias y perdón por la intromisión en el foro de una pregunta no
acorde!

rubén

El 7 de septiembre de 2016, 10:33, Ruben Tobalina Ramirez <
lagrimaescrita en gmail.com> escribió:

> Buenos días,
>
> la pregunta estaba un poco mal formulada. No buscaba tanto ordenadores con
> Linux instalado,
>
> El 6 de septiembre de 2016, 22:50, Carlos Ortega <cof en qualityexcellence.es
> > escribió:
>
>> Hola,
>>
>> Dell es los pocos que yo sepa que ofrecen equipos con Linux instalado
>> como SO de base:
>>
>> http://www.dell.com/es/empresas/p/xps-13-9350-laptop-ubuntu/pd?oc=bnx9333
>>
>> Saludos,
>> Carlos Ortega
>> www.qualityexcellence.es
>>
>> El 6 de septiembre de 2016, 21:33, Ruben Tobalina Ramirez <
>> lagrimaescrita en gmail.com> escribió:
>>
>>> Buenas,
>>>
>>> gracias a los que me ayudaron, he conseguido hacer el código más o menos
>>> como queria. Lo pego por aqui por si a alguien le interesa. Me hubiese
>>> gustado hacerlo en dos ejes pero tengo que entregar la practica de la
>>> especialidad en 3 dias y hay muchas cosas que revisar, pero ya que he
>>> visto
>>> como se hace lo investigaré.
>>>
>>> ft$hora <- strptime(ft$hora, format = "%H:%M", tz="GMT-2")
>>> ft$Miles <- as.numeric(gsub("\\.", "", as.character(ft$Miles)))
>>> ft$Share <- as.numeric(gsub("\\,", ".", as.character(ft$Share)))
>>>
>>> ggbar <- ggplot(ft, aes(x = hora, y = frec)) +
>>>   geom_area(fill= "gray") +
>>>   scale_x_datetime(date_breaks = "5 mins", date_labels = "%H:%M") +
>>>   theme(panel.background = element_rect(fill = "white")) +
>>>   scale_y_continuous(limits=c(0,1500)) +
>>>   labs(x = "Minutos", y = "Tweets") + # Etiquetas o títulos de los ejes
>>>   theme(axis.text.x=element_text(angle=90)) # Orientación texto eje x
>>>
>>> ggshr <- ggplot(ft, aes(x = hora, y = Share)) + geom_line(color="blue") +
>>>   scale_x_datetime(date_breaks = "5 mins", date_labels = "%H:%M") +
>>>   theme(panel.background = element_rect(fill = "white")) +
>>>   scale_y_continuous(limits=c(0,50)) +
>>>   labs(x = "Minutos", y = "Share (%)") + # Etiquetas o títulos de los
>>> ejes
>>>   theme(axis.text.x=element_text(angle=90)) # Orientación texto eje x
>>>
>>> library(gridExtra)
>>> grid.arrange(ggbar, ggshr, nrow=2, ncol=1)
>>>
>>> Buenas noches!
>>>
>>> PD: Se me jodido, o esta punto de hacerlo mi portátil. Alguna sugerencia
>>> de
>>> marca "normal" que funcione de base muy bien con Linux??
>>>
>>> Rubén.
>>>
>>>         [[alternative HTML version deleted]]
>>>
>>> _______________________________________________
>>> R-help-es mailing list
>>> R-help-es en r-project.org
>>> https://stat.ethz.ch/mailman/listinfo/r-help-es
>>>
>>
>>
>>
>> --
>> Saludos,
>> Carlos Ortega
>> www.qualityexcellence.es
>>
>
>
>
> --
> Rubén.
>



-- 
Rubén.

	[[alternative HTML version deleted]]