Re: [R-es] Optimizar código

[Francisco Viciana]

Esta es otra forma:

CADENA_1<-c("caliente","frío","gordo","flaco")
CADENA_2<-c("bueno","malo","bueno","malo")
CADENA<-rbind(CADENA_1,CADENA_2)
CADENA<-t(CADENA)
LISTA<-c("caliente","perro","flaco","gato","coche")

# ---

CADENA    <- CADENA_2
names(CADENA) <- CADENA_1
CADENA[LISTA] -> RESULTADO
RESULTADO[!is.na(RESULTADO)]


On 07/02/18 03:57, Carlos Ortega wrote:

Hola,

Esta es una forma...


str_1 <- c("caliente","frío","gordo","flaco")
str_2 <- c("bueno","malo","bueno","malo")
str_3 <- cbind(str_1, str_2)

l_val <- c("caliente","perro","flaco","gato","coche")

row_god <- which(l_val %in% str_3[,1], arr.ind = TRUE )
row_god

[1] 1 3

Saludos,
Carlos Ortega
www.qualityexcellence.es


El 6 de febrero de 2018, 23:15, Fernando Sanchez via R-help-es <
r-help-es@r-project.org> escribió:


Hola a todos,
Os pongo aquí debajo un pequeño fragmento de código. Resulta que dispongo
de una CADENA que tiene dos columnas. Una con palabras y la otra que dice
si es bueno o malo. En otra variable tengo una LISTA. Quiero cruzar todas
las palabras de la lista con todas las de la cadena y cuando alguna
coincida, que me indique en qué fila está y también si la palabra es
"buena" o "mala". El código que os pongo más abajo funciona, pero es poco
eficiente cuando las listas son más largas.
Se os ocurre otra forma de programarlo más elegantemente en R.

CADENA_1<-c("caliente","frío","gordo","flaco")CADENA_2<-c("
bueno","malo","bueno","malo")CADENA<-rbind(CADENA_1,CADENA_
2)CADENA<-t(CADENA)LISTA<-c("caliente","perro","flaco","gato","coche")
for (i in 1:nrow(CADENA)) {for (j in 1:length(LISTA))
{if(toString(LISTA[j])==toString(CADENA[i,1]))
{print(paste("fila:",j,CADENA[i,2],sep=" "))}}}
Un saludo y muchas gracias a todos.
 [[alternative HTML version deleted]]

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es






--
+--
| Francisco J. Viciana Fernández
| Dpto. Indicadores Demográficos
| Servicio de Estadísticas Demográficas y Sociales
| Instituto de Estadística y Cartografía de Andalucía
| Leonardo Da Vinci, nº 21. Isla de La Cartuja.
| 41071 SEVILLA.
| franciscoj.vici...@juntadeandalucia.es
+--

<>___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Re: [R-es] CRON JOBS

[Javier Marcuzzi]

Estimado Jesús Para Fernández

R server es una versión comercial de Microsoft, entiendo que todo eso está
solucionado para el escenario que usted plantea y debe haber más de una
forma dependiendo de algunas variables particulares, lo más seguro y para
no tener problemas, puede consultar directamente a ellos, no es por
despreciar la consulta en la lista, sino para estar 100 % seguro, no vaya a
ser que por dar por entendido algo cometamos un error y arruinemos su
trabajo.

Desde mi punto de vista, debe ser configurado como servicio desde el
sistema operativo, pero al ser ambos de la misma empresa, seguramente hay
una forma más simple que la otra, yo supe usar la versión R Server, lo que
tiene de lindo es la posibilidad de realizar reportes, sin embargo lo que
tiene de feo, es que las librerías eran obsoletas, o puesto de otra forma,
tiene mayor estabilidad por ser más probado pero al costo de no tener
disponible las características posteriores a la versión de R Server.

Usted tiene instalado R Server? Porque posiblemente pueda leer desde su
computadora alguna estrategia para su necesidad.

Javier Rubén Marcuzzi

El 6 de febrero de 2018, 16:15, Jesús Para Fernández <
j.para.fernan...@hotmail.com> escribió:

> Buenas,
>
> Voy a dejar un programa en produccion en un servidor, el cual tiene que
> ejecutarse cada minuto, y si se reinicia el servidor o lo uqe sea, que se
> ponga a trabajar directamete.
>
> ¿R server permite hacer eso, o tengo que generar un script que se ejecute
> desde un cronjob del servidor?
>
> Desde mi ignorancia, considero que la segunda opcion es la más robusta
> frente a fallos.
>
> Un saludo
> Jesús
>
> [[alternative HTML version deleted]]
>
>
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
>

[[alternative HTML version deleted]]

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Re: [R-es] Optimizar código

[Javier Marcuzzi]

Estimado Fernando Sanchez

Creo que son buenas las ayudas que te han brindado, pero aparte de estas
siempre puedes realizar una compilación de un código que no está
optimizado, puedes ver el siguiente hipervínculo
http://homepage.divms.uiowa.edu/~luke/R/compiler/compiler.pdf

Javier Rubén Marcuzzi

El 6 de febrero de 2018, 19:15, Fernando Sanchez via R-help-es <
r-help-es@r-project.org> escribió:

> Hola a todos,
> Os pongo aquí debajo un pequeño fragmento de código. Resulta que dispongo
> de una CADENA que tiene dos columnas. Una con palabras y la otra que dice
> si es bueno o malo. En otra variable tengo una LISTA. Quiero cruzar todas
> las palabras de la lista con todas las de la cadena y cuando alguna
> coincida, que me indique en qué fila está y también si la palabra es
> "buena" o "mala". El código que os pongo más abajo funciona, pero es poco
> eficiente cuando las listas son más largas.
> Se os ocurre otra forma de programarlo más elegantemente en R.
>
> CADENA_1<-c("caliente","frío","gordo","flaco")CADENA_2<-c("
> bueno","malo","bueno","malo")CADENA<-rbind(CADENA_1,CADENA_
> 2)CADENA<-t(CADENA)LISTA<-c("caliente","perro","flaco","gato","coche")
> for (i in 1:nrow(CADENA)) {for (j in 1:length(LISTA))
> {if(toString(LISTA[j])==toString(CADENA[i,1]))
> {print(paste("fila:",j,CADENA[i,2],sep=" "))}}}
> Un saludo y muchas gracias a todos.
> [[alternative HTML version deleted]]
>
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>

[[alternative HTML version deleted]]

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Re: [R-es] CRON JOBS

[Javier Marcuzzi]

Yo entiendo que SQL Server licencia junto RServer, no se si lo venden
suelto.

El 7 de febrero de 2018, 12:19, Jesús Para Fernández <
j.para.fernan...@hotmail.com> escribió:

> Gracias a otdos por vuestrs respuestas.
>
> No sabia que rserver de microsoft fuera de pago, de hecho no veo nada por
> ahi donde figure ese aspecto. He visto que viene integrado con SQLServer,
> porlo uqe entiendo que pagada la licencia de SQLserver, R va integrado ya.
> ¿Es asi?
>
> Gracias!!!
> Jesús
> --
> *De:* Javier Marcuzzi 
> *Enviado:* miércoles, 7 de febrero de 2018 13:40
> *Para:* Jesús Para Fernández
> *Cc:* r-help-es@r-project.org
> *Asunto:* Re: [R-es] CRON JOBS
>
> Estimado Jesús Para Fernández
>
> R server es una versión comercial de Microsoft, entiendo que todo eso está
> solucionado para el escenario que usted plantea y debe haber más de una
> forma dependiendo de algunas variables particulares, lo más seguro y para
> no tener problemas, puede consultar directamente a ellos, no es por
> despreciar la consulta en la lista, sino para estar 100 % seguro, no vaya a
> ser que por dar por entendido algo cometamos un error y arruinemos su
> trabajo.
>
> Desde mi punto de vista, debe ser configurado como servicio desde el
> sistema operativo, pero al ser ambos de la misma empresa, seguramente hay
> una forma más simple que la otra, yo supe usar la versión R Server, lo que
> tiene de lindo es la posibilidad de realizar reportes, sin embargo lo que
> tiene de feo, es que las librerías eran obsoletas, o puesto de otra forma,
> tiene mayor estabilidad por ser más probado pero al costo de no tener
> disponible las características posteriores a la versión de R Server.
>
> Usted tiene instalado R Server? Porque posiblemente pueda leer desde su
> computadora alguna estrategia para su necesidad.
>
> Javier Rubén Marcuzzi
>
> El 6 de febrero de 2018, 16:15, Jesús Para Fernández <
> j.para.fernan...@hotmail.com> escribió:
>
> Buenas,
>
> Voy a dejar un programa en produccion en un servidor, el cual tiene que
> ejecutarse cada minuto, y si se reinicia el servidor o lo uqe sea, que se
> ponga a trabajar directamete.
>
> ¿R server permite hacer eso, o tengo que generar un script que se ejecute
> desde un cronjob del servidor?
>
> Desde mi ignorancia, considero que la segunda opcion es la más robusta
> frente a fallos.
>
> Un saludo
> Jesús
>
> [[alternative HTML version deleted]]
>
>
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
> 
>
>
>

[[alternative HTML version deleted]]

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

[R-es] Contar comas de una variable

[Miriam Alzate]

Buenas tardes,

Necesito contar cuántas comas hay en cada celda. Los datos tienen esta 
forma:


 Pros Comas
Opinión 1calidad,1
Opinión 2calidad, diseño, color, 3
Opinión 3precio, accesibilidad, sienta bien, luminoso, 4


La variable Pros es la que tengo y la variable Comas es la que recoge 
cuántas comas hay en la variable Pros.


Un saludo

Miriam

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Re: [R-es] Contar comas de una variable

[Carlos Ortega]

Hola,

Esta es una forma...

> library(stringr)
> val <- c("hola, hola, hola, hola")
>
> num_com <- str_count(val, pattern = "," )
> num_com
[1] 3

Saludos,
Carlos Ortega
www.qualityexcellence.es

El 7 de febrero de 2018, 17:55, Miriam Alzate 
escribió:

> Buenas tardes,
>
> Necesito contar cuántas comas hay en cada celda. Los datos tienen esta
> forma:
>
>  Pros Comas
> Opinión 1calidad,1
> Opinión 2calidad, diseño, color, 3
> Opinión 3precio, accesibilidad, sienta bien, luminoso, 4
>
>
> La variable Pros es la que tengo y la variable Comas es la que recoge
> cuántas comas hay en la variable Pros.
>
> Un saludo
>
> Miriam
>
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>



-- 
Saludos,
Carlos Ortega
www.qualityexcellence.es

[[alternative HTML version deleted]]

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Re: [R-es] Contar comas de una variable

[Marcelino de la Cruz Rot]

Así:


Pros<- c("calidad,", "calidad, diseño, color,", "precio, accesibilidad, 
sienta bien, luminoso,")

(Comas <-sapply(strsplit(Pros, ","), length))





El 07/02/2018 a las 17:55, Miriam Alzate escribió:

Buenas tardes,

Necesito contar cuántas comas hay en cada celda. Los datos tienen esta 
forma:


 Pros Comas
Opinión 1    calidad,    1
Opinión 2    calidad, diseño, color, 3
Opinión 3    precio, accesibilidad, sienta bien, luminoso, 4


La variable Pros es la que tengo y la variable Comas es la que recoge 
cuántas comas hay en la variable Pros.


Un saludo

Miriam

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es
.



--
Marcelino de la Cruz Rot
Depto. de Biología y Geología
Física y Química Inorgánica
Universidad Rey Juan Carlos
Móstoles España

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

[R-es] Ayuda OVER_QUERY_LIMIT

[David Contreras]

Buena tarde a todos,

Estos realizando un proceso que requiere asignar coordenadas a un buen
número de registros. Estoy usando el paquete ggmap, pero luego de hacer uso
de la georeferenciación se genera el error "geocode failed with status
OVER_QUERY_LIMIT" debido al límite de registros diarios. A pesar de decir
el error que es cada día, ya me está generando error con pocos registros
incluso sin completar los 2500 del día.
En general la georeferenciación sirve de manera intermitente, es decir a
veces sirve y a veces no.

Nos gustaría si hay alguna forma de evitar que se genere este error sin
tener que pagar dinero por la licencia de API.

Gracias.




*David Contreras*

Estadístico.
davidcontrera...@gmail.com 

[[alternative HTML version deleted]]

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Re: [R-es] Optimizar código

[Fernando Sanchez via R-help-es]

Hola a todos,Muchas gracias por las propuestas. He probado las tres y han 
funcionado perfectamente.saludos,Fernando

  De: Javier Marcuzzi 
 Para: Fernando Sanchez  
CC: "r-help-es@r-project.org" 
 Enviado: Miércoles 7 de febrero de 2018 13:46
 Asunto: Re: [R-es] Optimizar código
   
Estimado Fernando Sanchez
Creo que son buenas las ayudas que te han brindado, pero aparte de estas 
siempre puedes realizar una compilación de un código que no está optimizado, 
puedes ver el siguiente hipervínculo 
http://homepage.divms.uiowa.edu/~luke/R/compiler/compiler.pdf
Javier Rubén Marcuzzi
El 6 de febrero de 2018, 19:15, Fernando Sanchez via R-help-es 
 escribió:

Hola a todos,
Os pongo aquí debajo un pequeño fragmento de código. Resulta que dispongo de 
una CADENA que tiene dos columnas. Una con palabras y la otra que dice si es 
bueno o malo. En otra variable tengo una LISTA. Quiero cruzar todas las 
palabras de la lista con todas las de la cadena y cuando alguna coincida, que 
me indique en qué fila está y también si la palabra es "buena" o "mala". El 
código que os pongo más abajo funciona, pero es poco eficiente cuando las 
listas son más largas.
Se os ocurre otra forma de programarlo más elegantemente en R.

CADENA_1<-c("caliente","frío", "gordo","flaco")CADENA_2<-c(" 
bueno","malo","bueno","malo") CADENA<-rbind(CADENA_1,CADENA_ 
2)CADENA<-t(CADENA)LISTA<-c(" caliente","perro","flaco"," gato","coche")
for (i in 1:nrow(CADENA)) {for (j in 1:length(LISTA)) {if(toString(LISTA[j])== 
toString(CADENA[i,1]))  {print(paste("fila:",j,CADENA[ i,2],sep=" "))}}}
Un saludo y muchas gracias a todos.
        [[alternative HTML version deleted]]

__ _
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/ listinfo/r-help-es




   
[[alternative HTML version deleted]]

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Re: [R-es] Ayuda OVER_QUERY_LIMIT

[Javier Marcuzzi]

Estimado David Contreras

Hay dos formas, si tienes el dinero o si no tienes el dinero.

Si no tienes el dinero, no te preocupes, aparentemente la API le deja leer
algunos registros diarios, entonces todos los días puedes leer algunos y
guardarlos.

Si tienes el dinero te puedo comentar que es lindo que nos abonen por
nuestro trabajo.

Yo antes intentaba ahorrar todo lo que podía, pero la realidad era que
gastaba mucho tiempo y no andaba bien, luego comencé a pagar dentro de mis
posibilidades, y me di cuenta que ahorraba tiempo y mi tiempo también
cuesta.

Javier Rubén Marcuzzi

El 7 de febrero de 2018, 17:36, David Contreras 
escribió:

> Buena tarde a todos,
>
> Estos realizando un proceso que requiere asignar coordenadas a un buen
> número de registros. Estoy usando el paquete ggmap, pero luego de hacer uso
> de la georeferenciación se genera el error "geocode failed with status
> OVER_QUERY_LIMIT" debido al límite de registros diarios. A pesar de decir
> el error que es cada día, ya me está generando error con pocos registros
> incluso sin completar los 2500 del día.
> En general la georeferenciación sirve de manera intermitente, es decir a
> veces sirve y a veces no.
>
> Nos gustaría si hay alguna forma de evitar que se genere este error sin
> tener que pagar dinero por la licencia de API.
>
> Gracias.
>
>
>
>
> *David Contreras*
>
> Estadístico.
> davidcontrera...@gmail.com 
>
> [[alternative HTML version deleted]]
>
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>

[[alternative HTML version deleted]]

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es