Articles of r

Combinación de vectores (cbind) de diferente longitud

Tengo varios vectores de longitud desigual y me gustaría cbind . He puesto los vectores en una lista y he intentado combinar el uso de do.call(cbind, …) : nm <- list(1:8, 3:8, 1:5) do.call(cbind, nm) # [,1] [,2] [,3] # [1,] 1 3 1 # [2,] 2 4 2 # [3,] 3 5 3 # […]

Cómo agregar el plegado de código a los fragmentos de salida en documentos rmarkdown html

Realmente aprecio la función “code_folding” en RMarkdown. Sin embargo, lo que realmente necesito es mostrar el código todo el tiempo y alternar la visualización en la salida. — title: “test file” author: “dayne” date: “June 10, 2016” output: html_document: code_folding: hide — “`{r setup, include=FALSE} knitr::opts_chunk$set(echo = TRUE) “` Here is a basic example. “`{r} […]

Cómo filtrar de manera eficiente un dataframe?

Tengo un dataframe e intenté seleccionar solo las observaciones que me interesan con esto: data[data[“Var1”]>10] Desafortunadamente, este comando destruye la estructura de data.frame y devuelve un vector largo. Lo que quiero obtener es el dataframe acortado por las observaciones que no coinciden con mis criterios.

Agregue una columna de “rango” a un dataframe

Tengo un dataframe con recuentos de diferentes elementos, en diferentes años: df <- data.frame(item = rep(c('a','b','c'), 3), year = rep(c('2010','2011','2012'), each=3), count = c(1,4,6,3,8,3,5,7,9)) Y me gustaría agregar una columna “year.rank”, que da el rango de un elemento dentro de un año determinado, donde un conteo más alto conduce a un “rango” más alto. Con […]

Coloque una leyenda para cada rejilla facet_wrap en ggplot2

Tengo este dataframe: Date Server FileSystem PercentUsed 1 12/1/2011 A / 60 2 1/2/2012 A /var 50 3 2/1/2012 A tmp 90 4 2/10/2012 A /db 86 5 2/13/2012 A /app 90 6 12/1/2011 BC: 67 7 1/2/2012 BD: 67 8 2/1/2012 BF: 34 9 2/10/2012 B /restre 89 10 2/13/2012 BG: 56 11 12/1/2011 […]

Usar una paleta de colores predefinida en ggplot

¿Alguien sabe cómo usar una paleta de colores predefinida en ggplot? Tengo un vector de colores que me gustaría usar: rhg_cols <- c("#771C19", "#AA3929", "#E25033", "#F27314", "#F8A31B", "#E2C59F", "#B6C5CC", "#8E9CA3", "#556670", "#000000") Pero cuando trato de pasarlo a nada sucedió ggplot(mydata, aes(factor(phone_partner_products)), color = rhg_cols) + geom_bar()

Idioma para la grabación de estilo ifelse para múltiples categorías

Me topo con esto con la suficiente frecuencia como para darme cuenta de que tiene que haber una buena expresión idiomática. Supongamos que tengo un data.frame con muchos atributos, incluido “producto”. También tengo una clave que traduce productos a marca + tamaño. Los códigos de productos 1-3 son Tylenol, 4-6 son Advil, 7-9 son Bayer, […]

¿Cómo anulo una función no visible en el espacio de nombres del paquete?

Básicamente quiero cambiar una función no visible de un paquete. Para las funciones visibles, es decir, las funciones que no tienen asterisco cuando se les llama a los methods , encontré dos publicaciones sobre cómo podría lograr mi objective: Use assignInNamespace : vea la publicación en R-help . Utilizar la fix : ver la publicación […]

¿Cómo asignar el resultado de la expresión anterior a una variable?

Supongamos que estoy usando la consola interactiva de R, y acabo de hacer algo como esto: long_running_command() Ese comando de ejecución larga devuelve un valor, y me acabo de dar cuenta de que quería asignar ese valor a una variable en lugar de descartarlo. Entonces, ¿cómo puedo obtener ese valor sin ejecutar el comando otra […]

dplyr :: group_by_ con la entrada de cadena de caracteres de varios nombres de variables

Estoy escribiendo una función donde se le pide al usuario que defina una o más variables de agrupación en la llamada a la función. Los datos se agrupan luego usando dplyr y funciona como se espera si solo hay una variable de agrupación, pero no he descubierto cómo hacerlo con múltiples variables de agrupación. Ejemplo: […]