Articles of r

R y llamadas al sistema

He usado R en el pasado para hacer llamadas muy básicas a la línea de comandos. El ejemplo se puede encontrar aquí . Esta vez, estoy buscando imitar este código que se ejecuta correctamente desde la línea de comandos en Windows: > cd C:\Documents and Settings\BTIBERT\My Documents\My Dropbox\Eclipse\Projects\R\MLB\retrosheet\rawdata > bgame -y 2010 2010bos.eva >2010bos.txt Este […]

exportar marcos de datos a Excel a través de xlsx con formato condicional

Quiero exportar marcos de datos a Excel y resaltar celdas de acuerdo con ciertas reglas. No creo que esta respuesta a una pregunta similar sea correcta. Creo que es posible, y creo que me CellStyle usando las funciones CellStyle del paquete xlsx . A continuación, describo lo que he intentado. La mayoría de las ideas […]

Cómo sombrear una región bajo una curva usando ggplot2

He estado tratando de usar ggplot2 para producir un diagtwig similar a este gráfico R: xv<-seq(0,4,0.01) yv<-dnorm(xv,2,0.5) plot(xv,yv,type="l") polygon(c(xv[xv<=1.5],1.5),c(yv[xv<=1.5],yv[xv==0]),col="grey") Hasta aquí he llegado con ggplot2: x<-seq(0.0,0.1699,0.0001) ytop<-dnorm(0.12,0.08,0.02) MyDF<-data.frame(x=x,y=dnorm(x,0.08,0.02)) p<-qplot(x=MyDF$x,y=MyDF$y,geom="line") p+geom_segment(aes(x=0.12,y=0,xend=0.12,yend=ytop)) Me gustaría sombrear la región de la cola más allá de x = 0.12. ¿Cómo haría esto usando ggplot o qplot? En términos generales, ¿cómo […]

Recodificar el factor categórico con N categorías en N columnas binarias

Marco de datos original: v1 = sample(letters[1:3], 10, replace=TRUE) v2 = sample(letters[1:3], 10, replace=TRUE) df = data.frame(v1,v2) df v1 v2 1 aC 2 aa 3 cc 4 ba 5 cc 6 cb 7 aa 8 ab 9 ac 10 ab Nuevo dataframe: new_df = data.frame(row.names=rownames(df)) for (i in colnames(df)) { for (x in letters[1:3]) { […]

Seleccione NA en una tabla de datos en R

¿Cómo selecciono todas las filas que tienen un valor faltante en la clave principal en una tabla de datos? DT = data.table(x=rep(c(“a”,”b”,NA),each=3), y=c(1,3,6), v=1:9) setkey(DT,x) Seleccionar un valor en particular es fácil DT[“a”,] La selección de los valores faltantes parece requerir una búsqueda vectorial. No se puede usar la búsqueda binaria. ¿Estoy en lo correcto? […]

¿Distancia rápida de Levenshtein en R?

¿Hay algún paquete que contenga la función de conteo de distancia Levenshtein que se implementa como un código C o Fortran? Tengo muchas cadenas para comparar y stringMatch de MiscPsycho es demasiado lento para esto.

La forma más simple de hacer que rbind ignore los nombres de las columnas

Esto surgió solo en una respuesta a otra pregunta aquí. Cuando se rbind dos marcos de datos, coincide con las columnas por nombre en lugar de por índice, lo que puede generar un comportamiento inesperado: > df df xy 1 1 3 2 2 4 > rbind(df,df[,2:1]) xy 1 1 3 2 2 4 3 […]

¿Cómo se determina el espacio de nombre de una función?

Dada una función, ¿cómo se determina de qué espacio de nombres proviene? Por ejemplo, si mean.default en el símbolo del sistema, el resultado incluye el hecho de que está en el paquete base. Quiero poder hacer algo como getNamespace(mean.default) y hacer que devuelva “base” (o el entorno base real). Hay una función getNamespace pero parece […]

readRDS (archivo) en R

Cada vez que bash instalar un paquete en R, aparece el siguiente error: Error in readRDS(file) : unknown input format Esto comenzó a ocurrir después de que tuve un locking del sistema. Estoy ejecutando 32 bit R 2.13.0 en Windows 7. Intenté quitar y reinstalar R, pero continúo obteniendo el error. ¿Hay alguna manera de […]

Caracteres Unicode en PDF ggplot Salida

¿Cómo puedo usar caracteres Unicode para tags, títulos y cosas similares en un diagtwig PDF creado con ggplot2? Considere el siguiente ejemplo: library(ggplot2) qplot(Sepal.Length, Petal.Length, data=iris, main=”Aʙᴄᴅᴇғɢʜɪᴊᴋʟᴍɴᴏᴘǫʀsᴛᴜᴠᴡxʏᴢ”) ggsave(“t.pdf”) El título de la gráfica usa caracteres Unicode (letras mayúsculas), que en el resultado aparecen como … El problema ocurre solo con diagtwigs de pdf; si reemplazo […]