Preguntas etiquetadas con r

En una función, quiero calcular valores numéricos, darles nombres y devolver un orden NumericVectoren Rcpp. Puedo ordenar los vectores (usando esto ), pero el orden de los nombres de los valores sigue siendo el mismo. library(Rcpp) x <- c(a = 1, b = 5, c = 3) cppFunction(' NumericVector foo(NumericVector …

8 r  rcpp 

Digamos que tenemos una matriz de 5x5, llena de ceros. myMatrix <- matrix(rep(0, 25), ncol = 5) Ahora, escojamos un triplete de enteros entre 1 y 5. triplet <- c(1,2,3) Para todas las combinaciones de este triplete ahora agregamos 1 en la matriz, con esta función: addCombinationsToMatrix <- function(.matrix, .triplet){ …

8 r  algorithm  mathematical-optimization 

Tener un marco de datos como este: data.frame(text = c("separate1: and: more","another 20: 42") ¿Cómo es posible separar usando el primero: en cada fila? Ejemplo de salida esperada data.frame(text1 = c("separate1","another 20"), text2 = c("and: more","42")

8 r 

Dado un gráfico de N vértices y la distancia entre los bordes de los vértices almacenados en tuplas T1 = (d11, d12, …, d1n) to Tn = (dn1, dn2, …, dnn). Descubra un árbol de expansión mínimo de este gráfico a partir del vértice V1. Además, imprima la distancia total …

8 r  minimum-spanning-tree 

Para fines de depuración, quiero imprimir un número de línea (y el nombre de la función) desde el lugar desde el que se llamó a la función actual. ¿Cómo consigo esto en R? He visto una solución para obtener el nombre del archivo fuente ¿Pero cómo obtener el número de …

8 r 

Tengo algunas cadenas que pueden contener letras, números y el símbolo '#'. Me gustaría eliminar dígitos, excepto las palabras que comienzan con '#' Aquí hay un ejemplo: "table9 dolv5e #10n #dec10 #nov8e 23 hello" Y la salida esperada es: "table dolve #10n #dec10 #nov8e hello" ¿Cómo puedo hacer esto con …

8 r  regex  gsub  stringr 

Soy nuevo en R, cualquier sugerencia sería apreciada. Estos son los datos: coordinates <- "(-79.43591570873059, 43.68015339477487), (-79.43491506339724, 43.68036886994886), (-79.43394727223847, 43.680578504490335), (-79.43388162422195, 43.68058996121469), (-79.43281544978878, 43.680808044458765), (-79.4326971769691, 43.68079658822322)" Me gustaría que esto se convierta: Latitude Longitude -79.43591570873059 43.68015339477487 -79.43491506339724 43.68036886994886 -79.43394727223847 43.680578504490335 -79.43388162422195 43.68058996121469 -79.43281544978878 43.680808044458765 -79.4326971769691 43.68079658822322

8 r  regex  string 

Tengo algunos datos que se parecen a los siguientes: $`2013 Jul` # A tibble: 3 x 12 AAPL AMD ADI ABBV A APD AA CF NVDA HOG WMT AMZN <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> <dbl> 1 -0.00252 0.00385 0.000314 0.00148 0.000231 0.000655 -0.00107 -0.00137 …

8 r 

Cuando se crea una matriz relativamente grande, Rstudio la marca como una matriz grande en la ventana de su entorno: x <- matrix(rnorm(10000 * 5000), ncol=5000) # Large matrix (50000000 elements, 381.5 Mb) La función mode () como se espera devuelve "numérico" para este objeto: mode(x) ## [1] "numeric" Sin …

8 r  matrix  rstudio 

Mis datos se ven así: # A tibble: 6 x 4 name val time x1 <chr> <dbl> <date> <dbl> 1 C Farolillo 7 2016-04-20 51.5 2 C Farolillo 3 2016-04-21 56.3 3 C Farolillo 7 2016-04-22 56.3 4 C Farolillo 13 2016-04-23 57.9 5 C Farolillo 7 2016-04-24 58.7 6 …

8 r  tidyr 

Tengo el siguiente Rmarkdowndocumento de ejemplo simple (test.Rmd): --- title: "Test Knit Caret Paralell VerboseIter" output: html_document --- ```{r setup, include=FALSE} knitr::opts_chunk$set(echo = TRUE) require(caret) require(doParallel) ``` ## data ```{r data} set.seed(998) training <- twoClassSim() ``` ## model ```{r fitmodel} fitControl <- trainControl( method = "repeatedcv", number = 3, repeats …

8 r  r-caret  doparallel 

Todavía estoy aprendiendo R. ¿Hay alguna forma automatizada de identificar si una R operationo una functiones vectorized? Para identificar si un Robjeto es un vector, puedo usar is.vector(x), que devuelve TRUEsi xes un vector o Falseno. ¿Hay algo similar para vectorized? Por ejemplo: x <- c(1,2,3) y <- c(3,4,5) x+y …

8 r 

El paquete ggridges le permite dibujar diagramas de cresta con cualquier color sólido: ggplot(iris, aes(x=Sepal.Width, y=Species))+ geom_density_ridges(alpha=0.33, scale=2, fill="#0570b0", colour=alpha(0.1))+ theme_classic() o con gradientes de color horizontales : ggplot(iris, aes(x=Sepal.Width, y=Species, fill=..x..))+ geom_density_ridges_gradient(scale=2,colour=alpha(0.1))+ theme_classic()+ scale_fill_gradient(low="#0570b0", high="White") Pero quiero saber si es posible producir un gráfico similar con un gradiente de …

8 r  ggplot2  ggridges