Articles of r

Gráfico de barras astackdas

Me gustaría crear un gráfico astackdo utilizando ggplot2 y geom_bar. Aquí está mi fuente de datos: Rank F1 F2 F3 1 500 250 50 2 400 100 30 3 300 155 100 4 200 90 10 Quiero un gráfico astackdo donde x es el rango yy es los valores en F1, F2, F3. # Getting […]

Variables especiales en ggplot (..count .., ..density .., etc.)

Considera las siguientes líneas. p <- ggplot(mpg, aes(x=factor(cyl), y=..count..)) p + geom_histogram() p + stat_summary(fun.y=identity, geom='bar') En teoría, los dos últimos deberían producir la misma ttwig. En la práctica, stat_summary falla y se queja de que falta la estética requerida. ¿Por qué no puedo usar ..count.. en stat_summary ? No puedo encontrar en ninguna parte […]

Cambiar los nombres de columna de un dataframe

Tengo un dataframe llamado “nuevo precio” (ver más abajo) y quiero cambiar los nombres de las columnas en mi progtwig en R. > newprice Chang. Chang. Chang. 1 100 36 136 2 120 -33 87 3 150 14 164 De hecho, esto es lo que estoy haciendo: names(newprice)[1]<-paste("premium") names(newprice)[2]<-paste("change") names(newprice)[3]<-paste("newprice") No puse esto en un […]

Mostrando texto debajo del gráfico generado por ggplot2

Estoy tratando de mostrar cierta información sobre los datos debajo de la ttwig creada en ggplot2 . Me gustaría trazar la variable N usando la coordenada del eje X de la gráfica, pero la coordenada Y debe ser del 10% desde la parte inferior de la pantalla. De hecho, las coordenadas Y deseadas ya están […]

Medir el tiempo de ejecución de la función en R

¿Hay una forma estandarizada en R de medir el tiempo de ejecución de la función? Obviamente puedo tomar system.time antes y después de la ejecución y luego tomar la diferencia de aquellos, pero me gustaría saber si hay alguna forma o función estandarizada (me gustaría no inventar la rueda). Me parece recordar que una vez […]

Error de dcast: ‘Falta la función de agregación: valor predeterminado para la longitud’

Mi df ve así: Id Task Type Freq 3 1 A 2 3 1 B 3 3 2 A 3 3 2 B 0 4 1 A 3 4 1 B 3 4 2 A 1 4 2 B 3 Quiero reestructurar por Id y obtener: Id AB … Z 3 5 3 4 4 […]

¿Cómo calcula predict.lm () el intervalo de confianza y el intervalo de predicción?

Ejecuté una regresión: CopierDataRegression <- lm(V1~V2, data=CopierData1) y mi tarea era obtener una Intervalo de confianza del 90% para la respuesta media dada V2=6 y Intervalo de predicción del 90% cuando V2=6 . Use el siguiente código: X6 <- data.frame(V2=6) predict(CopierDataRegression, X6, se.fit=TRUE, interval="confidence", level=0.90) predict(CopierDataRegression, X6, se.fit=TRUE, interval="prediction", level=0.90) y obtuve (87.3, 91.9) y […]

¿Por qué X se une a data.tables no permite una combinación externa completa, o una combinación izquierda?

Esta es una cuestión filosófica sobre la syntax de unión de datos. Estoy encontrando más y más usos para data.tables, pero aún estoy aprendiendo … El formato de combinación X[Y] para data.tables es muy conciso, práctico y eficiente, pero hasta donde puedo decir, solo admite combinaciones internas y combinaciones externas derechas. Para obtener una combinación […]

Rcpp pasa por referencia vs. valor

Hice una primera puñalada en una función de Rcpp en inline y resolvió mi problema de velocidad (¡gracias Dirk!): R: Reemplazando los valores negativos por cero La versión inicial se veía así: library(inline) cpp_if_src <- ' Rcpp::NumericVector xa(a); int n_xa = xa.size(); for(int i=0; i < n_xa; i++) { if(xa[i]<0) xa[i] = 0; } return […]

Hacer un operador de concatenación de cadenas en R

Me preguntaba cómo se podría escribir un operador de concatenación de cadenas en R, algo así como || en SAS, + en Java / C # o & en Visual Basic. La manera más fácil sería crear un operador especial usando%, como `%+%` <- function(a, b) paste(a, b, sep="") pero esto lleva a muchos % […]