Articles of r

¿Cómo verificar si el objeto (variable) se define en R?

Me gustaría comprobar si alguna variable está definida en R – sin obtener un error. ¿Cómo puedo hacer esto? Mis bashs (no exitoso): > is.na(ooxx) Error: object ‘ooxx’ not found > is.finite(ooxx) Error: object ‘ooxx’ not found ¡Gracias!

Cómo pasa los parámetros a una aplicación shiny a través de la URL

En los navegadores web pasas parámetros a un sitio web como www.misitio.com/?parameter=1 Tengo una aplicación shiny y me gustaría usar el parámetro transferido al sitio en cálculos como entrada. Entonces, ¿es posible hacer algo como www.mysite.com/?parameter=1 y luego usar input! Parameter? ¿Puede proporcionar algún código de muestra o enlaces? Gracias

¿Qué hace la función invisible ()?

R help explica invisible() como “una función que devuelve una copia temporalmente invisible de un objeto”. Tengo dificultades para entender para qué se usa invisible() . ¿Sería capaz de explicar qué hace invisible() y cuándo esta función puede ser útil? He visto que invisible() casi siempre se usa en las funciones de método para print() […]

agrep: solo devolver el (los) mejor (s) partido (s)

Estoy usando la función ‘agrep‘ en R, que devuelve un vector de coincidencias. Me gustaría una función similar a agrep que solo devuelve la mejor coincidencia, o las mejores coincidencias si hay vínculos. Actualmente, estoy haciendo esto usando la función ‘sdist ()’ del paquete ‘cba’ en cada elemento del vector resultante, pero esto parece muy […]

cómo propagar o emitir múltiples valores en r

Aquí está el conjunto de datos de juguete para este ejemplo: data <- data.frame(x=rep(c("red","blue","green"),each=4), y=rep(letters[1:4],3), value.1 = 1:12, value.2 = 13:24) xy value.1 value.2 1 red a 1 13 2 red b 2 14 3 red c 3 15 4 red d 4 16 5 blue a 5 17 6 blue b 6 18 7 […]

geom_boxplot con valores precalculados

En el pasado, he sido capaz de crear diagtwigs de caja usando ggplot2 al proporcionar el bigote inferior, el cuantil inferior, la mediana, el cuantil superior y el bigote superior junto con las tags del eje x. Por ejemplo: DF <- data.frame(x=c("A","B"), min=c(1,2), low=c(2,3), mid=c(3,4), top=c(4,5), max=c(5,6)) ggplot(DF, aes(x=x, y=c(min,low,mid,top,max))) + geom_boxplot() haría un diagtwig […]

Ejecutando scripts R desde VBA

¿Cómo puedo ejecutar un script R desde VBA? Supongamos que tengo un script R almacenado como C: \ XXX \ testR.R Intenté usar Shell, pero no del todo exitoso.

¿Suma acumulativa acumulada?

¿Cómo puedo hacer una sum acumulativa sobre un vector (como cumsum ), pero acotada para que la sum nunca pase por debajo de un límite inferior o por encima de un límite superior? La función de cumsum estándar daría como resultado lo siguiente. foo <- c(100, -200, 400, 200) cumsum(foo) # [1] 100 -100 300 […]

operaciones agrupadas que dan como resultado una longitud no igual a 1 o una longitud de grupo en dplyr

No estoy seguro de qué función usar para hacer lo siguiente: library(data.table) dt = data.table(a = 1:4, b = 1:2) dt[, rep(a[1], 3), by = b] # b V1 #1: 1 1 #2: 1 1 #3: 1 1 #4: 2 2 #5: 2 2 #6: 2 2 Ambos summarise y mutate están contentos con esta […]

¿Cómo puedo evitar que rbind () se vuelva realmente lento a medida que el dataframe crezca?

Tengo un dataframe con solo 1 fila. Para esto, empiezo a agregar filas usando rbind df #mydataframe with only one row for (i in 1:20000) { df<- rbind(df, newrow) } esto se vuelve muy lento a medida que crece. ¿Porqué es eso? y ¿cómo puedo hacer que este tipo de código sea más rápido?