search for: copio

...) g4(x, 4) Saludos cordiales, Jorge.- 2015-07-28 13:08 GMT+10:00 <javier.ruben.marcuzzi en gmail.com>: > Señores > > > > Tengo un problema, donde use distintas alternativas y el informe de error > es el mismo. > > > > Mi ultima alternativa es una función que copio y pego junto con un ejemplo > de uso. > > > g3 <- function(n_caracteres, codigo_llega){ > + if (n_caracteres == 6) > + { > + res <- substr(codigo_llega, start=0, stop=4) > + } > + else > + { > + res <- codigo_llega > + } > + res...

Buenas tardes, Quisiera obtener el intervalo de confianza (y también intervalos de predicción) para los valores predichos en un modelo nls. ¿Hay alguna manera que no sea por ggplot2 (me interesaría obtener el valor listado -además de en el gráfico-) o por bootstrap? Os copio el código del ajuste del modelo y predicción para los 3 días siguientes: *#Ajuste del modelo* model = nls(formula = N~K*exp(-log(K/N0)*exp(-a*(t-t0))), data = datos, start = list(K=300, a = 0.25)) *#Predicción para 3 días* new_juliano = c(juliano,juliano[(length...

...t;- df.tmp$ID[i] - df.tmp$ID[i-1] df.tmp$difYE[i] <- df.tmp$YEAR[i] - df.tmp$YEAR[i-1] } } } df.tmp #------- Segundo bucle para introducir filas en los saltos de años # Introduzco filas cuando el salto de años sea mayor que 2... df.new <- 0 for(i in 1:nrow(df.tmp)) { #Copio la fila tal cual cuando la diferencia en años es 0 o menor que dos. if(df.tmp$difYE[i] < 2) { df.new <- rbind(df.new, c(df.tmp$ID[i] , df.tmp$YEAR[i] ,df.tmp$cusum[i])) } else { # Si la diferencia en años es mayor que dos, ciclo en años y teniendo en cuenta que cusum se acum...

Hola, Puede ser que la RODBC no corra en la versión 3.3.1? Abajo copio el error. Sabe alguien que puede estar pasando? *Warning in install.packages :* * package ?RODBC? is not available (for R version 3.3.1)* *Warning in install.packages :* * unable to access index for repository https://cran.rstudio.com/bin/windows/contrib/3.3 <https://cran.rstudio.com/bin/win...

Estimados Tengo un problema, R se cuelga (cierra, aborta, etc.) al usar códigos de neuralnet. Copio un ejemplo cualquiera para preguntar si a otros les pasa lo mismo o es un problema puntual en mi computadora (uso R revolution win 10). # install, load package install.packages(NeuralNetTools) library(NeuralNetTools) # create model library(neuralnet) AND <- c(rep(0, 7), 1) OR <- c(0, rep(1,...

...} > } > } > #df.tmp (Lo comento porque no es el resultado finalmente buscado) > > #------- Segundo bucle para introducir filas en los saltos de años > # Introduzco filas cuando el salto de años sea mayor que 2... > df.new <- 0 > for(i in 1:nrow(df.tmp)) { > > #Copio la fila tal cual cuando la diferencia en años es 0 o menor que dos. > if(df.tmp$difYE[i] < 2) { > > df.new <- rbind(df.new, c(df.tmp$ID[i] , df.tmp$YEAR[i],df.tmp$cusum[i])) > > } else { > # Si la diferencia en años es mayor que dos, ciclo en años y teniendo...

Estimado Freddy Omar López Quintero Muchas gracias. Probé de su sugerencia el ejemplo 3.4, pero me falla, copio y pego todo el código junto al error > library(tikzDevice) tikz(?figs/simpleEx.tex?,width=3.5,height=3.5) plot(1,main=?Hello World!?) dev.off() Error: unexpected symbol in "library(tikzDevice) tikz" > Algo anda mal. Javier Rubén Marcuzzi De: Freddy Omar López Quintero Enviado...

...cabo la sapienza. A ver: tengo un sript de Python script.py que neesita sus argumentos arg1 arg2 arg3, si desde la consola del sistema me pongo en la carpeta en la que lo tengo y hago: $ script.py arg1 arg arg3 Funciona perfecto. Pero desde R no lo consigo (entiendo que por no saber) Lo hago así (copio y pego): dir <- getwd() setwd('data/row/directoriocondatos/') py_run_string( paste0('script.py ', paste0(ar[i], '1 '), ar[i], paste0(' ', ar[i], '3') )) setwd(dir) El resultado del paste0() ese lo...

Estimados Copio un mensaje de error que da igraph, es más fácil verlo que explicarlo. > fastgreedy.community(udatos) Error in .Call("R_igraph_community_fastgreedy", graph, as.logical(merges), : At fast_community.c:553 : fast-greedy community finding works only on graphs without multiple edges, In...

Estimados Hace un tiempo que no uso rvest, corrí un código viejo, anda sin problemas, escribo el nuevo y hay algo que me olvide. Básicamente desde el navegador de internet selecciono el xpath, copio y pego este en R, pero me sale el siguiente error. > text <- Pagina.R %>% + html_nodes(xpath='//*[@id="content"]/p')%>% + html_text() > text character(0) Miré mi código viejo junto con el sitio que funciona, pero le hice una modificaci...

...orden. Quiero representar la recta de regresión en el scaterplot y he visto que sería con la función lines() pero me no sale una linea, sino varias. yo únicamente lo que quiero representar es la curva que representa la ecuación de regresión. ¿Alquien sabe cómo podría solucionarlo? Mil gracias! Copio los datos y el código que tengo. > d_curts [1] 5.5731584687 -0.8497090298 0.4200072789 2.9401847875 -0.9689894713 [6] 0.4925896464 0.4471931879 1.1878281363 -0.5754282154 6.0011162787 [11] -0.6025635799 1.7802600660 -0.4322190239 -0.0006110837 -0.2550656393 [16] 2.6603504501 0.670...

...n/windows/contrib/3.3/RODBC_1.3-15.zip > > > Saludos, > Carlos Ortega > www.qualityexcellence.es > > > 2018-09-07 18:14 GMT+02:00 juan manuel dias <juamadias en gmail.com>: > >> Hola, >> >> Puede ser que la RODBC no corra en la versión 3.3.1? Abajo copio el error. >> >> Sabe alguien que puede estar pasando? >> >> *Warning in install.packages :* >> * package ?RODBC? is not available (for R version 3.3.1)* >> *Warning in install.packages :* >> * unable to access index for repository >> https://cran.rs...

Buenas tardes Les consulto los siguiente, dentro de unos datos hay registros faltantes, estos son NA. Me gustaría poder avisar cuáles son los registros no tomados en cuenta porque son NA. Como no puedo reproducir el error, copio y pego un script R que es la forma que yo razone, la cuál me funciona, y un trozo de la captura de pantalla donde aparece mi error, es decir todo NA. # NA's persona <- c('javier', 'ruben', 'marcuzzi') bici <- c(1,1,3) auto <- c(NA,1,1) cosas <- data.frame(...

Hola a todos, Tengo problemas con los comandos sink() y source() cuando los utilizo conjuntamente. He creado un script con una función dentro de la cual se ejecuta sink() Si copio-pego este scritp directamente en la consola no hay problemas y el resultado de la función es desviado a un fichero. Sin embargo cuando utilizo el comando source() para leer el script con el contenido de la función el resultado no es dirigido al fichero. Además de esto me me veo obligado a ejecutar...

Buenos días. Hago mis mapas con el código que os copio abajo, pero me gustaría que me dibujase las líneas del mapa después de poner los puntos para que se vean. Puedo hacer los puntos más pequeños, pero entonces quedan separados y yo quiero que rellenen el mapa. Gracias, como siempre, Manuel print(ggplot(legend=FALSE)+geom_path(data=map_data(...

...31 language R version.string R version 3.2.1 (2015-06-18) nickname World-Famous Astronaut Un cordial saludo, Juan El 03/11/2015 a las 15:13, Javier Rubén Marcuzzi escribió: > Estimados > > Tengo un problema, R se cuelga (cierra, aborta, etc.) al usar códigos de neuralnet. Copio un ejemplo cualquiera para preguntar si a otros les pasa lo mismo o es un problema puntual en mi computadora (uso R revolution win 10). > > # install, load package > install.packages(NeuralNetTools) > library(NeuralNetTools) > > # create model > library(neuralnet) > AND <...

Buenas. El Paquete pdp es muy fácil de usar, pero cuando se lo aplico a mis datos me da: Error in eval(stats::getCall(object)$data) : object 'x.data' not found. Os copio abajo un ejemplo de aplicación a un RF. El mio es de un boosted regression trees (paquete gbm). No sé si esa puede ser la razón del error. En el paquete pdp no especifica que sea solo para RF, aunque en los ejemplos que encontré nunca eran de boosted ... Solo de RF y SVM. Gracias, Manuel...

Conoceis algo desarrollado con deeplearning para el reconocimeinto de texto en R? Gracias Enviado desde Correo<https://go.microsoft.com/fwlink/?LinkId=550986> para Windows 10 [[alternative HTML version deleted]]

Estimado Carlos Ortega Muchas gracias, al ver su correo recordé por donde estaba eso muy fácil, copio y pego la solución, era tan fácil que no lo recordaba. > table(d) , , Etablecimiento = Est1 Factor Dieta A B 1 220 0 2 0 120 3 0 0 4 0 0 , , Etablecimiento = Est2 Factor Dieta A B 1 0 0 2 0 0 3 0 120 4 0 118 Jav...

...s://go.microsoft.com/fwlink/?LinkId=550986> para Windows 10 De: Juan Antonio Gil<mailto:jgil en edu.uned.es> Enviado: domingo, 19 de febrero de 2017 8:37 Para: r-help-es en r-project.org<mailto:r-help-es en r-project.org> Asunto: Re: [R-es] Reconocimiento de texto Hola Jesús te copio un pequeño programa que hace la función de ocr a partir de una imagen en png. Saludos, Juan install.packages("tesseract") library(tesseract) text <- ocr("http://jeroenooms.github.io/images/testocr.png") cat(text) El 19/02/2017 a las 0:09, Jesús Para Fernández escribió:...