Articles of r

Diagtwigs Sankey en R?

Estoy tratando de visualizar mi flujo de datos con un diagtwig de Sankey en R. Encontré esta publicación de blog vinculada a un guión R que produce un Diagtwig de Sankey, desafortunadamente es bastante crudo y algo limitado (ver a continuación el código de muestra y los datos). ¿Alguien sabe de otros guiones, o tal […]

Verifique la existencia del directorio y cree si no existe

A menudo me encuentro escribiendo R scripts que generan una gran cantidad de resultados. Me parece más limpio poner esta salida en su propio directorio (s). Lo que he escrito a continuación comprobará la existencia de un directorio y se moverá dentro de él, o creará el directorio y luego se moverá a él. ¿Hay […]

Obtener LaTeX en R Parcelas

Me gustaría agregar la composición tipográfica LaTeX a los elementos de los gráficos en R (por ejemplo, el título, las tags de los ejes, las anotaciones, etc.) utilizando la combinación de base/lattice o con ggplot2 . Preguntas: ¿Hay alguna forma de obtener LaTeX en plots con estos paquetes y, de ser así, cómo se hace? […]

Cómo formar rápidamente grupos (cuartiles, deciles, etc.) ordenando columna (s) en un dataframe

Veo muchas preguntas y respuestas order sort y sort . ¿Hay algo que clasifique vectores o marcos de datos en agrupaciones (como cuartiles o deciles)? Tengo una solución “manual”, pero es probable que haya una mejor solución que haya sido probada en grupo. Aquí está mi bash: temp <- data.frame(name=letters[1:12], value=rnorm(12), quartile=rep(NA, 12)) temp # […]

Agregar un objeto a una lista en R en tiempo constante amortizado, O (1)?

Si tengo una lista de lista R, puede agregar un elemento obj como lo hace: mylist[[length(mylist)+1]] <- obj Pero seguramente hay una forma más compacta. Cuando era nuevo en R, traté de escribir en lappend() así: lappend <- function(lst, obj) { lst[[length(lst)+1]] <- obj return(lst) } pero, por supuesto, eso no funciona debido a la […]

Gradiente de n colores que van desde el color 1 y el color 2

A menudo trabajo con ggplot2 que hace agradables los degradados ( ggplot2 clic aquí para ver un ejemplo ). Tengo una necesidad de trabajar en la base y creo que las scales se pueden usar allí para crear degradados de color también, pero estoy severamente alejado de cómo. El objective básico es generar una paleta […]

La prueba anova falla en los ajustes de lme creados con fórmula pegada

A menudo especifico el argumento de fórmula para modelar funciones de ajuste como lm o lme pegando juntas las partes que necesito, como en la respuesta de @DWin a esta pregunta: Comprender lm y environment . En la práctica esto se ve así: library(nlme) set.seed(5) ns <- 5; ni <- 5; N <- ns*ni d […]

Cómo indexar una secuencia vectorial dentro de una secuencia vectorial

Tengo una solución para un problema que implica bucle y funciona, pero siento que me falta algo que implica una implementación más eficiente. El problema: tengo una secuencia vectorial numérica, y quiero identificar la (s) posición (es) de inicio en otro vector del primer vector. Funciona así: # helper function for matchSequence # wraps a […]

¿Cómo puedo clasificar las observaciones en grupo más rápido?

Tengo un problema realmente simple, pero probablemente no estoy pensando en vector lo suficiente como para resolverlo de manera eficiente. Intenté dos enfoques diferentes y han estado funcionando en dos computadoras diferentes durante mucho tiempo. Ojalá pudiera decir que la competencia lo hizo más emocionante, pero … bleh. observaciones de rango en grupo Tengo datos […]

Agregue un dataframe basado en pares de columnas desordenadas

Tengo un conjunto de datos que se ve así: id1 id2 size 1 5400 5505 7 2 5033 5458 1 3 5452 2873 24 4 5452 5213 2 5 5452 4242 26 6 4823 4823 4 7 5505 5400 11 Donde id1 e id2 son nodos únicos en un gráfico, y el size es un […]