Articles of r

Analizando datos diarios / semanales usando ts en R

Acabo de empezar a jugar con la clase ts para analizar algunos datos de series de tiempo que tengo. Me da la sensación de que la clase ts no es adecuada para analizar datos diarios o semanales. Casi todos los ejemplos que veo en la web o en “Series de tiempo introductorio con R” de […]

Cambio de formas utilizadas para scale_shape () en ggplot2

Supongamos que tengo lo siguiente y <- rnorm(10) b <- as.factor(sample(1:4,10,replace=T)) qplot(1:10, y, shape=b) ¿Cómo cambio las formas que se usan con ggplot2 ?

Refiriéndose a columnas data.table por nombres guardados en variables

data.table es un fantástico paquete R y lo estoy usando en una biblioteca que estoy desarrollando. Hasta ahora todo va muy bien, excepto por una complicación. Parece ser mucho más difícil (en comparación con los marcos de datos convencionales) referirse a data.table columnas data.table utilizando nombres guardados en variables (como para marcos de datos sería, […]

La subconjunto de marcos de datos R da como resultado misteriosas filas de NA

He estado encontrando lo que creo que es un error. No es gran cosa, pero tengo curiosidad si alguien más ha visto esto. Lamentablemente, mis datos son confidenciales, así que tengo que inventar un ejemplo y no será muy útil. Al subconjunto de mis datos, de vez en cuando obtengo misteriosas filas de NA que […]

Cambiar fonts en ggplot2

Érase una vez, cambié mi fuente ggplot2 usando windowsFonts(Times=windowsFont(“TT Times New Roman”)) para cambiarla. Ahora no puedo sacarlo de esto. Al intentar establecer family=”” en el theme() ggplot2 theme() no puedo generar un cambio en las fonts a medida que compilo el MWE a continuación con diferentes familias de fonts. library(ggplot2) library(extrafont) loadfonts(device = “win”) […]

En R data.table, ¿cómo paso los parámetros variables a una expresión?

Estoy atascado con un pequeño problema R con data.table . Su ayuda es muy apreciada. Cómo hago esto: getResult <- function(dt, expr, gby) { e <- substitute(expr) b <- substitute(gby) return(dt[,eval(e),by=b]) } v1 <- "Sepal.Length" v2 <- "Species" dt <- data.table(iris) rDT <- getResult(dt, sum(v1, na.rm=TRUE), v2) Me aparece el siguiente error: Error en sum […]

Density2d Traza usando otra variable para el relleno (similar a geom_tile)?

Estoy tratando de trazar un mapa para mi proyecto final, y estoy tratando de hacer un mapa de calor del crimen por BLock en los Estados Unidos. Para cada bloque, tengo Lat, Lon y una predicción de la tasa de criminalidad. Sigue esta estructura: Lat / Lon / Prediction -76.0 / 40.0 / 125 -76.120 […]

Botón ‘Restablecer entradas’ en la shiny aplicación

Me gustaría implementar un botón ‘Restablecer entradas’ en mi shiny aplicación. Aquí hay un ejemplo con solo dos entradas donde estoy usando las funciones de actualización para establecer los valores de nuevo a los valores predeterminados: library(shiny) runApp(list( ui = pageWithSidebar( headerPanel(“‘Reset inputs’ button example”), sidebarPanel( numericInput(“mynumber”, “Enter a number”, 20), textInput(“mytext”, “Enter a text”, […]

cambiar ambos títulos de leyenda en un ggplot con dos leyendas

Tengo dos leyendas en mi ggplot con dos títulos de leyenda diferentes (creados automáticamente desde ggplot() ). Ahora, quiero cambiar estos títulos de leyenda. + labs(colour = “legend name”) solo cambia el segundo título de leyenda. ¿Cómo puedo cambiar el primero también? Data de muestra: dataset <- structure(list(date = structure(c(1264572000, 1266202800, 1277362800), class = c("POSIXt", […]

Eliminar todo el texto antes del colon

Tengo un archivo que contiene una cierta cantidad de líneas. Cada línea se ve así: TF_list_to_test10004/Nus_k0.345_t0.1_e0.1.adj:PKMYT1 Me gustaría eliminar todo el carácter anterior a “:” para retener solo PKMYT1 que es un nombre de gen. Como no soy un experto en scripting regex, ¿alguien puede ayudarme a hacer esto usando Unix (sed o awk) o […]