Re: [R-es] (sin asunto)

2023-02-14 Por tema Jorge I Velez 
Manuel,

Si los archivos están en workig directory, basta con que hagas

files <-  list.files(pattern = ".xlsx")
list_df <- lapply(files, function(f){
  data <- read_excel(f)
  data
}

Para acceder al primer archivo basta con hacer

list_df[[1]]

Si los archivos tiene el _mismo_ nombre en las columnas, puedes unirlos
haciendo

datos_completos <- do.call(rbind, list_df)

Espero sea de utilidad.

Saludos,
Jorge.-



On Tue, Feb 14, 2023 at 12:08 AM Manuel Mendoza 
wrote:

> Buenos días, tengo un conjunto de 10 bases de datos en excel cuyos nombres
> van de BIO1 a BIO10. Quiero hacer un loop en el que me coja una cada vez.
> He probado lo que os pongo abajo (y otras cosas parecidas) y obviamente no
> funciona. ¿Conocéis alguna forma?
> Gracias como siempre,
> Manuel
>
> BIOs<-
> ("BIO1”,”BIO2”,”BIO3","BIO4”,”BIO5”,”BIO6”,”BIO7”,”BIO8","BIO9”,”BIO10”)
> for (j in 1:length(BIOs)) {
>   data <- read_excel("BIOs[j].xlsx")
> ...
>
> [[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] (sin asunto)

2023-02-14 Por tema Manuel Mendoza 
Gracias Marrcelino y Juan, con paste (y BIOs<-c("BIO2" ...) funcionó.
Un saludo,
Manuel

El mar, 14 feb 2023 a las 8:38, Marcelino de la Cruz Rot (<
marcelino.delac...@urjc.es>) escribió:

> Buenos días:
>
> BIOs<-
> ("BIO1”,”BIO2”,”BIO3","BIO4”,”BIO5”,”BIO6”,”BIO7”,”BIO8","BIO9”,”BIO10”)
> for (j in BIOs) {
>excel <- paste(j,".xlsx", sep="")
>data <- read_excel(excel)
> ...
>
>
> Un saludo,
> Marcelino
>
> El 14/02/2023 a las 6:07, Manuel Mendoza escribió:
> > Buenos días, tengo un conjunto de 10 bases de datos en excel cuyos
> nombres
> > van de BIO1 a BIO10. Quiero hacer un loop en el que me coja una cada vez.
> > He probado lo que os pongo abajo (y otras cosas parecidas) y obviamente
> no
> > funciona. ¿Conocéis alguna forma?
> > Gracias como siempre,
> > Manuel
> >
> > BIOs<-
> > ("BIO1”,”BIO2”,”BIO3","BIO4”,”BIO5”,”BIO6”,”BIO7”,”BIO8","BIO9”,”BIO10”)
> > for (j in 1:length(BIOs)) {
> >data <- read_excel("BIOs[j].xlsx")
> > ...
> >
> >   [[alternative HTML version deleted]]
> >
> > ___
> > 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
>

[[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] (sin asunto)

2023-02-13 Por tema Marcelino de la Cruz Rot 

Buenos días:

BIOs<-
("BIO1”,”BIO2”,”BIO3","BIO4”,”BIO5”,”BIO6”,”BIO7”,”BIO8","BIO9”,”BIO10”)
for (j in BIOs) {
  excel <- paste(j,".xlsx", sep="")
  data <- read_excel(excel)
...


Un saludo,
Marcelino

El 14/02/2023 a las 6:07, Manuel Mendoza escribió:

Buenos días, tengo un conjunto de 10 bases de datos en excel cuyos nombres
van de BIO1 a BIO10. Quiero hacer un loop en el que me coja una cada vez.
He probado lo que os pongo abajo (y otras cosas parecidas) y obviamente no
funciona. ¿Conocéis alguna forma?
Gracias como siempre,
Manuel

BIOs<-
("BIO1”,”BIO2”,”BIO3","BIO4”,”BIO5”,”BIO6”,”BIO7”,”BIO8","BIO9”,”BIO10”)
for (j in 1:length(BIOs)) {
   data <- read_excel("BIOs[j].xlsx")
...

[[alternative HTML version deleted]]

___
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] (sin asunto)

2023-02-13 Por tema Manuel Mendoza 
Buenos días, tengo un conjunto de 10 bases de datos en excel cuyos nombres
van de BIO1 a BIO10. Quiero hacer un loop en el que me coja una cada vez.
He probado lo que os pongo abajo (y otras cosas parecidas) y obviamente no
funciona. ¿Conocéis alguna forma?
Gracias como siempre,
Manuel

BIOs<-
("BIO1”,”BIO2”,”BIO3","BIO4”,”BIO5”,”BIO6”,”BIO7”,”BIO8","BIO9”,”BIO10”)
for (j in 1:length(BIOs)) {
  data <- read_excel("BIOs[j].xlsx")
...

[[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] (sin asunto)

2021-05-10 Por tema Javier Marcuzzi 
Estimado López

Es que debe hacer click en 1, en 2, en 3, de esta forma recorre todos los
datos. Para hacer click debe analizar el código html, y luego en R crear un
código para que lo automatice. Casi todas las variantes tienen como ejemplo
buscar una palabra en el buscador, bueno, es click en el botón y en
parámetro en lugar de la palabra va el índice de tabla. Pero, hay que
hacerlo, web scraping tiene sus cosas, yo lo supe realizar con R, ahora uso
c#, pero solo por la asistencia del editor para escribir el código y el
mezclar lenguajes, pero, si son pocos datos lo realizo a mano,
automatizarlo es mucho trabajo y esto lleva tiempo.

Javier Rubén Marcuzzi

El lun, 10 may 2021 a las 5:42, Javi Lopez ()
escribió:

> Hola. Acabo de suscribirme a la lista y espero poder colaborar aunque soy
> nuevo en R y estoy aprendiendo.
>
> Estoy intentando hacer un raspado de páginas web (web scraping),pero con mi
> código solo consigo que me devuelva la primera tabla, y necesitaría al
> menos una decena.
>
> url <- http://www.infocif.es/ranking/ventas-empresas/espana
> pagina <- read_html(url, as.data.frame=T, stringsAsFactors = TRUE)
> pagina %>%
> html_nodes("table") %>%
> .[[1]] %>%
> html_table(fill=T) -> x
>
> Así, como digo, consigo los datos de la primera tabla, pero no de las
> siguientes.
>
> Gracias por cualquier ayuda y por aceptarme en esta comunidad. Saludos
>
> Javier
>
> [[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] (sin asunto)

2021-05-10 Por tema Carlos J. Gil Bellosta 
Hola, ¿qué tal?

Tienes que bajar la tabla de

http://www.infocif.es/ranking/ventas-empresas/espana?pagina=1,
http://www.infocif.es/ranking/ventas-empresas/espana?pagina=
2,
etc.

Lo puedes hacer en un bucle.

Un saludo,

Carlos J. Gil Bellosta
http://www.datanalytics.com

El lun, 10 may 2021 a las 10:42, Javi Lopez ()
escribió:

> Hola. Acabo de suscribirme a la lista y espero poder colaborar aunque soy
> nuevo en R y estoy aprendiendo.
>
> Estoy intentando hacer un raspado de páginas web (web scraping),pero con mi
> código solo consigo que me devuelva la primera tabla, y necesitaría al
> menos una decena.
>
> url <- http://www.infocif.es/ranking/ventas-empresas/espana
> pagina <- read_html(url, as.data.frame=T, stringsAsFactors = TRUE)
> pagina %>%
> html_nodes("table") %>%
> .[[1]] %>%
> html_table(fill=T) -> x
>
> Así, como digo, consigo los datos de la primera tabla, pero no de las
> siguientes.
>
> Gracias por cualquier ayuda y por aceptarme en esta comunidad. Saludos
>
> Javier
>
> [[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] (sin asunto)

2021-05-10 Por tema Javi Lopez 
Hola. Acabo de suscribirme a la lista y espero poder colaborar aunque soy
nuevo en R y estoy aprendiendo.

Estoy intentando hacer un raspado de páginas web (web scraping),pero con mi
código solo consigo que me devuelva la primera tabla, y necesitaría al
menos una decena.

url <- http://www.infocif.es/ranking/ventas-empresas/espana
pagina <- read_html(url, as.data.frame=T, stringsAsFactors = TRUE)
pagina %>%
html_nodes("table") %>%
.[[1]] %>%
html_table(fill=T) -> x

Así, como digo, consigo los datos de la primera tabla, pero no de las
siguientes.

Gracias por cualquier ayuda y por aceptarme en esta comunidad. Saludos

Javier

[[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] (sin asunto)

2021-03-27 Por tema Jorge I Velez 
Manuel,

Si entiendo bien, algo como esto te servirá:

# máximo por fila
apply(probs, 1, max, na.rm = TRUE)

# probabilidades promedio por columna
colMeans(probs, na.rm = TRUE)

# probabilidad promedio para todos
mean(c(probs), na.rm = TRUE)

Saludos,
Jorge.-

El El vie, 26 de mar. de 2021 a la(s) 1:55 p. m., Manuel Mendoza <
mmend...@fulbrightmail.org> escribió:

> Muy buenas, tengo una matriz (probs) de 100 x 2, que son probabilidades.
> > head(probs, 3)
> 1   2
> [1,] 0.8282016   0.1717984
> [2,] 0.1288460   0.8711540
> [3,] 0.8830735   0.1169265
>
>   A partir de ella obtengo un vector de 100 elementos que incluye el valor
> máximo de los dos. Utilizo
>
>   Maxprob<-c()
> for(j in 1:100){
>   Maxprob[[j]] <- c(max(probs[j,]))
> }
>
> > head(Maxprob,3)
> [[1]]
> [1] 0.8282016
> [[2]]
> [1] 0.871154
> [[3]]
> [1] 0.8830735
>
> Esto lo hice hace años y calculaba la media de todos los valores de
> Maxprob con mean(Maxprob), y funcionaba, puesto que lo utilicé a menudo
> durante años, con distintas dfs. Pero ahora me dice: Warning message: In
> mean.default(Maxprob) : argument is not numeric or logical: returning NA
>
> He probado a calcular los valores máximos con:
>  Maxprob<-pmax(c(Prob[,1:2])) y hace bien la media con mean(Maxprob), pero
> el resto del código sale distinto que antes. De hecho, ya no sale bien.
> Llevo un buen rato dándole vueltas pero no doy con la clave.
> A ver si alguien pudiera darme aunque sea una pista.
>
> Gracias, como siempre,
> Manuel
>
> [[alternative HTML version deleted]]
>
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
-- 
Sent from my phone. Please excuse my brevity and misspelling.

[[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] (sin asunto)

2021-03-26 Por tema Manuel Mendoza 
Muy buenas, tengo una matriz (probs) de 100 x 2, que son probabilidades.
> head(probs, 3)
1   2
[1,] 0.8282016   0.1717984
[2,] 0.1288460   0.8711540
[3,] 0.8830735   0.1169265

  A partir de ella obtengo un vector de 100 elementos que incluye el valor
máximo de los dos. Utilizo

  Maxprob<-c()
for(j in 1:100){
  Maxprob[[j]] <- c(max(probs[j,]))
}

> head(Maxprob,3)
[[1]]
[1] 0.8282016
[[2]]
[1] 0.871154
[[3]]
[1] 0.8830735

Esto lo hice hace años y calculaba la media de todos los valores de
Maxprob con mean(Maxprob), y funcionaba, puesto que lo utilicé a menudo
durante años, con distintas dfs. Pero ahora me dice: Warning message: In
mean.default(Maxprob) : argument is not numeric or logical: returning NA

He probado a calcular los valores máximos con:
 Maxprob<-pmax(c(Prob[,1:2])) y hace bien la media con mean(Maxprob), pero
el resto del código sale distinto que antes. De hecho, ya no sale bien.
Llevo un buen rato dándole vueltas pero no doy con la clave.
A ver si alguien pudiera darme aunque sea una pista.

Gracias, como siempre,
Manuel

[[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] (sin asunto)

2021-01-25 Por tema Manuel Mendoza 
Muy buenas, tengo algunas dudas sobre gradient boosting que quizás alguien
pueda resolverme.

gbm.step, del paquete dismo, tarda mucho más que gbm, del paquete gbm.
Yo había asumido que es porque busca el número óptimo de árboles por
validación cruzada. He visto, sin embargo, que gbm también te da ese número
óptimo, y con modelo$cv.fitted te da, además, las predicciones sobre las
muestras OOB de la VC, lo que me permite representarlas frente a a variable
objetivo y evaluar, además, la capacidad predictiva del algoritmo con R2.
gbm.step te da directamente esa varianza, con modelo$cv.statistics[3], pero
no consigo las predicciones sobre las OOB para representarlas frente a la
variable objetivo.

En resumen, mis dos cuestiones son:
 ¿qué hace gbm.step que no hace gbm, si tarda tanto?
¿es posible obtener con gbm.step esas predicciones sobre las OOB?

Gracias, como siempre,
Manuel

[[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] (sin asunto)

2020-08-24 Por tema Eric 
Creo que el problema se podría simplificar y aún obtener un resultado 
aceptable si simplemente haces un ajuste lineal en un entorno del punto. 
Como ya tienes los valores de los puntos de cada curva como dices 
Carlos, creo que con esa información podrías identificar un entorno 
adecuado en el cual ajustar linealmente.


Cuéntanos como te va,

Saludos !!

Eric.



On 24-08-20 12:52, Carlos Ortega wrote:

Hola Manuel,

Resolver el punto de corte de forma analítica implicaría el tener 
ajustada cada densidad también de forma analítica.

Una alternativa que se me ocurre es la siguiente:

  * Con la función "density()" ajustar la densidad de las presencias y
las ausencias.
  o Con esta función (del paquete base) obtienes los valores x e
y. Seguro que dentro del objeto de ggplot también está, pero
con "density()" acceder a esos valores es mucho más sencillo.
  * Esos valores x, y de cada densidad, los puedes ajustar con una
función polinómica, o vaya si conoces el tipo de función analítica
a la que se debieran de ajustar, puedes ajustar los valores a esos
datos (función "nls()" ).
  o Y teniendo ya las funciones analíticas el problema se reduce a
solucionar el sistema de ecuaciones para encontrar los puntos
de corte (función "solve()").

Vaya, es un tanto elaborado, pero con un par de funciones sencillas, 
se puede automatizar todo esto. :-).


Gracias,
Carlos Ortega
www.qualityexcellence.es 

El lun., 24 ago. 2020 a las 14:17, Manuel Mendoza 
(mailto:mmend...@fulbrightmail.org>>) 
escribió:


Buenas tardes, tengo una variable bimodal (/var)/, de presencias y
ausencias (1s y 0s) y otra variable, /prob/, con las
probabilidades que le asigna un modelo (entre 0 y 1).
Con: *ggplot(Preds, aes(x=prob, fill= var )) + geom_density(alpha=.3)*
obtengo la distribución de las presencias y de las ausencias, por
separado, en función del valor de probabilidad asignado. Las dos
curvas se cruzan en un punto. ¿Sabéis si hay forma de averiguar el
valor de /prob/ de ese punto analíticamente?
Gracias,
Manuel
image.png
___
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 

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

Re: [R-es] (sin asunto)

2020-08-24 Por tema Carlos Ortega 
Hola Manuel,

Resolver el punto de corte de forma analítica implicaría el tener ajustada
cada densidad también de forma analítica.
Una alternativa que se me ocurre es la siguiente:

   - Con la función "density()" ajustar la densidad de las presencias y las
   ausencias.
  - Con esta función (del paquete base) obtienes los valores x e y.
  Seguro que dentro del objeto de ggplot también está, pero con "density()"
  acceder a esos valores es mucho más sencillo.
   - Esos valores x, y de cada densidad, los puedes ajustar con una función
   polinómica, o vaya si conoces el tipo de función analítica a la que se
   debieran de ajustar, puedes ajustar los valores a esos datos (función
   "nls()" ).
  - Y teniendo ya las funciones analíticas el problema se reduce a
  solucionar el sistema de ecuaciones para encontrar los puntos de corte
  (función "solve()").

Vaya, es un tanto elaborado, pero con un par de funciones sencillas, se
puede automatizar todo esto. :-).

Gracias,
Carlos Ortega
www.qualityexcellence.es

El lun., 24 ago. 2020 a las 14:17, Manuel Mendoza (<
mmend...@fulbrightmail.org>) escribió:

> Buenas tardes, tengo una variable bimodal (*var)*, de presencias y
> ausencias (1s y 0s) y otra variable, *prob*, con las probabilidades que
> le asigna un modelo (entre 0 y 1).
> Con: *ggplot(Preds, aes(x=prob, fill= var )) + geom_density(alpha=.3)*
> obtengo la distribución de las presencias y de las ausencias, por
> separado, en función del valor de probabilidad asignado. Las dos curvas se
> cruzan en un punto. ¿Sabéis si hay forma de averiguar el valor de *prob* de
> ese punto analíticamente?
> Gracias,
> Manuel
> [image: image.png]
> ___
> 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
___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

[R-es] (sin asunto)

2020-08-24 Por tema Manuel Mendoza 
Buenas tardes, tengo una variable bimodal (*var)*, de presencias y
ausencias (1s y 0s) y otra variable, *prob*, con las probabilidades que le
asigna un modelo (entre 0 y 1).
Con: *ggplot(Preds, aes(x=prob, fill= var )) + geom_density(alpha=.3)*
obtengo la distribución de las presencias y de las ausencias, por separado,
en función del valor de probabilidad asignado. Las dos curvas se cruzan
en un punto. ¿Sabéis si hay forma de averiguar el valor de *prob* de ese
punto analíticamente?
Gracias,
Manuel
[image: image.png]
___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Re: [R-es] (sin asunto)

2020-04-14 Por tema Carlos Ortega 
Hola Manuel,

Prueba a forzar la salida del gráfico de ggplot con "print(pyt)".

Gracias,
Carlos Ortega
www.qualityexcellence.es

El mar., 14 abr. 2020 a las 19:49, Manuel Mendoza (<
mmend...@fulbrightmail.org>) escribió:

> Hola de nuevo, hago un mapa con ggplot:
>
> pyt<-ggplot(data, aes(x = longitud, y = latitud)) +
> geom_point(aes(color = factor(ptyrup)))
> windows();pyt
>
> y después hago un loop con for. En vez de  print(i), que me indica por
> dónde va el loop,  me gustaría que me fuera añadiendo una línea vertical al
> mapa en la longitud que corresponde a i. Con plot () es muy fácil:
> abline(v=i), pero con ggplot, no me añade la línea, y si hago un nuevo mapa
> con la nueva línea, me borra la anterior.
>
> Creía haberlo solucionado incluyendo en el loop:
>
>   pyt <- pyt+
>   geom_vline(xintercept = i)
>   pyt
>
> Pero tampoco funciona. Es extraño, pues sale bien si hago yo las
> iteraciones, una a una, pero cuando hago el loop no dibuja las líneas.
>
> Gracias, una vez más,
> Manuel
>
>
>
> Muchas gracias, como siempre.
>
> [[alternative HTML version deleted]]
>
> ___
> 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

[R-es] (sin asunto)

2020-04-14 Por tema Manuel Mendoza 
Hola de nuevo, hago un mapa con ggplot:

pyt<-ggplot(data, aes(x = longitud, y = latitud)) +
geom_point(aes(color = factor(ptyrup)))
windows();pyt

y después hago un loop con for. En vez de  print(i), que me indica por
dónde va el loop,  me gustaría que me fuera añadiendo una línea vertical al
mapa en la longitud que corresponde a i. Con plot () es muy fácil:
abline(v=i), pero con ggplot, no me añade la línea, y si hago un nuevo mapa
con la nueva línea, me borra la anterior.

Creía haberlo solucionado incluyendo en el loop:

  pyt <- pyt+
  geom_vline(xintercept = i)
  pyt

Pero tampoco funciona. Es extraño, pues sale bien si hago yo las
iteraciones, una a una, pero cuando hago el loop no dibuja las líneas.

Gracias, una vez más,
Manuel



Muchas gracias, como siempre.

[[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] (sin asunto)

2019-03-19 Por tema Carlos Ortega 
Tienes que hacerlo como indicas en la página donde te diste de alta.
Recuerda que en Gmail tienes filtros que puedes usar para que los correos
de la lista vayan directamente a la papelera...

Gracias,
Carlos.

El mar., 19 mar. 2019 a las 13:31, Carlos Gurrola (<
montielg.car...@gmail.com>) escribió:

> Quiero darme de baja de la lista, hace un par de días entré a la página y
> di de baja mi correo pero me siguen llegando.
>
> [[alternative HTML version deleted]]
>
> ___
> 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

[R-es] (sin asunto)

2019-03-19 Por tema Carlos Gurrola 
Quiero darme de baja de la lista, hace un par de días entré a la página y
di de baja mi correo pero me siguen llegando.

[[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] (sin asunto)

2017-02-06 Por tema Isidro Hidalgo Arellano 
Hola:
¿La "S" tienes que ponerla en mayúscula? ¿getSymbols() en lugar de
getsymbols()?
Un saludo

Isidro Hidalgo Arellano
Observatorio del Mercado de Trabajo
Consejería de Economía, Empresas y Empleo
http://www.castillalamancha.es/


-Mensaje original-
De: R-help-es [mailto:r-help-es-boun...@r-project.org] En nombre de José A.
Artés 
Enviado el: martes, 07 de febrero de 2017 2:00
Para: r-help-es@r-project.org
Asunto: [R-es] (sin asunto)

A pesar de haber instalado el paquete quantmod , cuando utilizó la función
getsymbols() me sale el sugiere mensaje: Error could not find función
"getSymbols". Al quién sabe porqué?

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

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

[R-es] (sin asunto)

2017-02-06 Por tema José A. Artés 
A pesar de haber instalado el paquete quantmod , cuando utilizó la función 
getsymbols() me sale el sugiere mensaje: Error could not find función 
"getSymbols". Al quién sabe porqué?

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

[R-es] (sin asunto)

2015-12-28 Por tema doblett 
Buenas tardes,
os pido ayuda sobre el siguiente tema. Tengo interes en mostrar informes
con Sweave/Latex y para ello genero tablas con xtable. Sin embargo muestra
la tabla al completo cuando lo que deseo es agrupar las celdas con el mismo
dato para dar claridad a la tabla.

La salida de xtable me genera:

[image: Imágenes integradas 3]



Para dar claridad lo he intentado con latex(tabular()) consiguiendo una
tabla con esta forma:

[image: Imágenes integradas 4]

Como veis en el primer caso me muestra los datos de interes pero sin
agrupar las celdas iguales, en el segundo caso me agrupa las celdas pero
muestra una cantidad de NA que ocultan los datos reales.

Las funciones utilizadas sobre el data.frame ha sido:


   - Primer caso: xtable(compara)
   - Segundo caso:  latex(tabular( year * mes * operacion * via *
   estrato ~  (muestrales + reales + cob.real)  * identity, data =  compara))



Muchas gracias de antemano.

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

Re: [R-es] (sin asunto)

2015-11-06 Por tema Albert Montolio 
En un archivo estan los meses en formato chapuzero:

Setembre-97, Octubre-97, Novembre-97.

Y en el otro en formato fecha: 01.09.1997, 01.10.1997, 01.11.1997 etc.

Simplemente quiero representar la Serie01 en función de los meses.

Danke! Gracias!

El 6 de noviembre de 2015, 14:39, Carlos Ortega 
escribió:

> Hola,
>
> ¿Nos puedes pasar una parte del csv y vemos cómo hacerlo?...
>
> Gracias,
> Carlos.
>
> El 6 de noviembre de 2015, 14:29, Albert Montolio <
> albert.monto...@gmail.com> escribió:
>
>> Hola a tod@s,
>>
>> sigo intentando representar una variable en función de meses. En la
>> columna Mesos tengo los meses de la siguiente manera:
>> 01/08/1996, 01/09/1996 etc.
>>
>> He probado con el siguiente comando:
>>
>> plot(Mesos, Serie01)
>>
>> obteniendo
>>
>>
>> y tendría que obtener:
>>
>>
>>
>>
>> [image: Imágenes integradas 2]
>>
>> Pero donde pone Observation Index, me gustaria tener los meses (para esta
>> grafica he usado indexplot),
>>
>> Intento con la funcion plot:
>>
>> wbd <- read.csv("Dades_PAC1Des96_Des08_PUNTS_DATE.csv",header=TRUE)
>> attach(wbd)
>> tDate <- as.Date(Mesos, "%d/%m/%Y")
>> plot(Visits ~ tDate, wbd, xaxt = "n", type = "l")
>> plot(asDate(Mesos), Serie01)
>>
>>
>> Pero no hay manera. Alguna idea donde esta el error?
>>
>> Gracias!
>>
>> --
>>
>>
>>
>> *Albert Montolio Aguado*
>>
>> ___
>> 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
>



-- 


*Albert Montolio Aguado*
Mesos,Serie00,Serie01,Serie02,Serie03,Serie04,Serie05,Serie06,Serie07,Serie08,Serie09,Serie10,Serie11,Serie12,Serie13,Serie14,Serie15
desembre-96,1996,0,39669394,41.55,19.2,0.1,2949,10376,21819000,110041,526,1.6,32875,22.4308,40878,15.6559
gener-97,1996.08,0,39673740.1601,41.4902560686,19.3954379283,0.414553485687,2958.49,10593.8832662585,22598455.4362982,110957,591.542776598863,1.79705384383192,32923.4175843921,22.2871,40.9041342345895,15.6674946481208
febrer-97,1996.17,0,39678092.5164,41.4308160785,19.5921162233,0.729545286659,2967.1,10811.0826192475,23365261.369231,112052,654.768442558181,1.98528615013108,32991.0550950275,22.1581,40.9236177932369,15.679643310151
març-97,1996.25,0,39682457.2647,41.3719839707,19.7912752515,1.0454137182,2973.94,11026.9141456973,24106768.295433,113507,713.359887238408,2.1558753813647,33097.132458149,22.0584,40.92979,15.6929
abril-97,1996.33,0,39686840.6013,41.3140636864,19.9941553797,1.36259709561,2978.12,11240.6939323383,24810326.7115387,115500,765,2.29,33260.8696,22,40.9206512252491,15.707109162112
maig-97,1996.42,0,39691248.7223,41.2573591668,20.2019969744,1.68153373415,2978.77,11451.738065901,25463287.1141829,118212,808.360655842956,2.41297250603698,33488.3649237053,21.9842,40.9126260246048,15.719276963072
juny-97,1996.5,0,39695687.8236,41.202174353,20.4160404024,2.00266194913,2975,11659.3626331157,26052999.999,121823,846.069672325457,2.50664154960673,33733.2307399175,22.0097,40.9268,15.72569
juliol-97,1996.58,0,39700164.1014,41.1488131864,20.6375260302,2.32642005582,2965.92,11862.8837207129,26576608.8875085,126495,881.74385264523,2.59698981837312,33935.9578361709,22.0751,40.9745016051544,15.7251612960235
agost-97,1996.67,0,39704683.7517,41.0975796079,20.8676942246,2.65324636951,2950.65,12061.6174154229,27070429.3827628,132328,919,2.7,34037037,22.1796,41.0280707009362,15.7263895783013
setembre-97,1996.75,0,39709252.9706,41.0487775589,21.1077853521,2.98357920549,2928.31,12254.8798039762,27580570.1137009,139404,960.733350029313,2.82761863202014,33998.8601676615,22.3222,41.0501,15.7406
octubre-97,1996.83,0,39713877.9543,41.0027109805,21.3590397794,3.31785687904,2898.01,12441.9869731032,28153139.708261,147805,1006.95286813999,2.97564765144196,33871.4238703025,22.4878,41.0167942059847,15.7750419500902
novembre-97,1996.92,0,39718564.8987,40.9596838138,21.6226978732,3.65651770545,2858.87,12622.2550095343,28834246.7943813,157614,1056.94595218067,3.1358528451428,33726.6257877921,22.6044,40.9588059864651,15.8211017607596
desembre-97,1997,0.48,39723320,40.92,21.9,4,2810,12795,2967,168913,1110,3.29,33636.3636,22.5857,40.92039,15.86619
gener-98,1997.08,1.28454014431,39728186.8953,40.8839083818,22.1914669933,4.34865098492,2750.99,12959.7531945001,30689030.3099638,181650,1165.76844403979,3.46249046588245,33653.6501837734,22.3867,40.9315252746103,15.9012005332452
febrer-98,1997.17,2.25586143614,39733358.9861,40.8514374073,22.494741553,4.70245351018,2683.27,13116.906496113,31850058.1367547,195232,1225.36885511458,3.6282678446254,33755.9592038724,22.1283,40.9648683161662,15.9307404156972
març-98,1997.25,3.39072734155,39739067.1148,40.8225604263,22.8067468461,5.06129933267,2608.78,13267.0669711868,33094326.2497632,208930,1290.28483863208,3.80491130105564,33901.8795220353,21.9727,40.97879,15.9629

Re: [R-es] (sin asunto)

2015-11-06 Por tema Carlos Ortega 
Hola,

De esta forma lo tienes...

#
datIn <- read.table("Dades_PAC1Des96_Des08_PUNTS_DATE.csv", header=T, as.is=T,
sep=",")
head(datIn)

library(stringr)
datIn$newMesos <- str_replace_all(datIn$Mesos, "/9", "/199")

library(lubridate)
datIn$dimeye <- as.character(dmy(datIn$newMesos))
datIn$dimeye <- str_replace_all(datIn$dimeye, "000", "200")
datIn$dimeye <- ymd(datIn$dimeye)

plot(datIn$dimeye, datIn$Serie01)
#

Saludos,
Carlos Ortega
www.qualityexcellence.es

El 6 de noviembre de 2015, 14:42, Albert Montolio  escribió:

> En un archivo estan los meses en formato chapuzero:
>
> Setembre-97, Octubre-97, Novembre-97.
>
> Y en el otro en formato fecha: 01.09.1997, 01.10.1997, 01.11.1997 etc.
>
> Simplemente quiero representar la Serie01 en función de los meses.
>
> Danke! Gracias!
>
> El 6 de noviembre de 2015, 14:39, Carlos Ortega 
> escribió:
>
>> Hola,
>>
>> ¿Nos puedes pasar una parte del csv y vemos cómo hacerlo?...
>>
>> Gracias,
>> Carlos.
>>
>> El 6 de noviembre de 2015, 14:29, Albert Montolio <
>> albert.monto...@gmail.com> escribió:
>>
>>> Hola a tod@s,
>>>
>>> sigo intentando representar una variable en función de meses. En la
>>> columna Mesos tengo los meses de la siguiente manera:
>>> 01/08/1996, 01/09/1996 etc.
>>>
>>> He probado con el siguiente comando:
>>>
>>> plot(Mesos, Serie01)
>>>
>>> obteniendo
>>>
>>>
>>> y tendría que obtener:
>>>
>>>
>>>
>>>
>>> [image: Imágenes integradas 2]
>>>
>>> Pero donde pone Observation Index, me gustaria tener los meses (para
>>> esta grafica he usado indexplot),
>>>
>>> Intento con la funcion plot:
>>>
>>> wbd <- read.csv("Dades_PAC1Des96_Des08_PUNTS_DATE.csv",header=TRUE)
>>> attach(wbd)
>>> tDate <- as.Date(Mesos, "%d/%m/%Y")
>>> plot(Visits ~ tDate, wbd, xaxt = "n", type = "l")
>>> plot(asDate(Mesos), Serie01)
>>>
>>>
>>> Pero no hay manera. Alguna idea donde esta el error?
>>>
>>> Gracias!
>>>
>>> --
>>>
>>>
>>>
>>> *Albert Montolio Aguado*
>>>
>>> ___
>>> 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
>>
>
>
>
> --
>
>
> *Albert Montolio Aguado*
>



-- 
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

[R-es] (sin asunto)

2015-11-06 Por tema Albert Montolio 
Hola a tod@s,

sigo intentando representar una variable en función de meses. En la columna
Mesos tengo los meses de la siguiente manera:
01/08/1996, 01/09/1996 etc.

He probado con el siguiente comando:

plot(Mesos, Serie01)

obteniendo


y tendría que obtener:




[image: Imágenes integradas 2]

Pero donde pone Observation Index, me gustaria tener los meses (para esta
grafica he usado indexplot),

Intento con la funcion plot:

wbd <- read.csv("Dades_PAC1Des96_Des08_PUNTS_DATE.csv",header=TRUE)
attach(wbd)
tDate <- as.Date(Mesos, "%d/%m/%Y")
plot(Visits ~ tDate, wbd, xaxt = "n", type = "l")
plot(asDate(Mesos), Serie01)


Pero no hay manera. Alguna idea donde esta el error?

Gracias!

-- 



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

[R-es] (sin asunto)

2014-11-13 Por tema Jorge Tornero - Listas 

Estimados todos:

Os escribo porque tengo un problema que nos está dejando un poco 
trastornadillos. Probablemente sea uno de esos que los ve un experto a 
un kilómetro y dice ¡oh! toca aquí. Pero nos trae de cabeza.


El caso es que aquí usamos un script para calcular ciertos parámetros 
relacionados con el método de producción diaria de huevos del boquerón 
del Golfo de Cádiz. Es un script que venimos usando desde hace tiempo 
sin problema.


Pero ahora nos da un problema (línea 292) en :

batch.glm - glm.nb(Fobs ~ Wnov, data=adults.dat, 
na.action=na.omit,link=identity,start=0)


Error: no valid set of coefficients has been found: please supply 
starting values

Además: Mensajes de aviso perdidos
In log(y/mu) : Se han producido NaNs

Aparte de que la documentación e información sobre el particular error 
no es abundante, he aquí lo que nos desconcierta: Ese mismo script, con 
datos similares (pero de otra campaña), corre perfectamente.


He probado a eliminar datos potencialmente conflictivos, pero nada. Los 
archivos con los datos están generados exactamente de la misma manera 
(salida de una base de datos postgresql, con idéntica consulta)


Se han revisado los datos y no aparece nada exótico. La verdad es que 
estoy un poco desorientado, y por eso escribo a la lista.


He dejado una copia del script, así como de los datos, por si alguien se 
animara a echar un vistazo en un gist en mi cuenta de github:


https://gist.github.com/734170b42c8307276451.git

Muchas gracias y un saludo

Jorge Tornero

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

Re: [R-es] (sin asunto)

2014-11-13 Por tema Jorge Tornero - Listas 

Perdón de nuevo. El enlace correctopara los datos es:

https://gist.github.com/jtornero/734170b42c8307276451


Gracias y un saludo

El 13/11/14 a las 14:03, Jorge Tornero - Listas escribió:

Estimados todos:

Os escribo porque tengo un problema que nos está dejando un poco 
trastornadillos. Probablemente sea uno de esos que los ve un experto a 
un kilómetro y dice ¡oh! toca aquí. Pero nos trae de cabeza.


El caso es que aquí usamos un script para calcular ciertos parámetros 
relacionados con el método de producción diaria de huevos del boquerón 
del Golfo de Cádiz. Es un script que venimos usando desde hace tiempo 
sin problema.


Pero ahora nos da un problema (línea 292) en :

batch.glm - glm.nb(Fobs ~ Wnov, data=adults.dat, 
na.action=na.omit,link=identity,start=0)


Error: no valid set of coefficients has been found: please supply 
starting values

Además: Mensajes de aviso perdidos
In log(y/mu) : Se han producido NaNs

Aparte de que la documentación e información sobre el particular error 
no es abundante, he aquí lo que nos desconcierta: Ese mismo script, 
con datos similares (pero de otra campaña), corre perfectamente.


He probado a eliminar datos potencialmente conflictivos, pero nada. 
Los archivos con los datos están generados exactamente de la misma 
manera (salida de una base de datos postgresql, con idéntica consulta)


Se han revisado los datos y no aparece nada exótico. La verdad es que 
estoy un poco desorientado, y por eso escribo a la lista.


He dejado una copia del script, así como de los datos, por si alguien 
se animara a echar un vistazo en un gist en mi cuenta de github:


https://gist.github.com/734170b42c8307276451.git

Muchas gracias y un saludo

Jorge Tornero

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


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

Re: [R-es] (sin asunto)

2014-08-11 Por tema Jorge I Velez 
Hola Alfredo,

Algunos comentarios/observaciones:

1.  No uses attach.  Mejor, explora la funcion with() y/o within().  attach
es muy peligroso.
2.  Solo por curiosidad, como hiciste para crear la tabla usando
latabla$ciudad de origen?  Supongo que deberia ser latabla$ciudad de
origen
3.  Lo que observas, tiene que ver con que en tus datos hay espacios
escondidos.  Una forma de resolver este problema (desde R) es utilizando
el paquete stringr y la funcion str_trim.  Hay dos ejemplos en la ayuda;
creo que el primero de ellos ilustra lo que ocurre en tu caso.

Saludos cordiales,
Jorge.-



2014-08-12 8:09 GMT+10:00 Alfredo Alvarado david.alvarad...@gmail.com:

 Buenas tardes grupo, un saludo.
 Busco su amable ayuda en los siguiente:
 Tengo una tabla con alrededor de 20 variables en columnas.
 La tabla proviene de un excel convertido en csv.
 Estoy tomando dos variables: la columna correspondiente a ciudad de
 origen y apellido de la persona.
 hago:
 attach(latabla)
 y luego names(latabla), y me da las variables que digo, latabla$ciudad
 de origen, y latabla$apellido.
 Quiero ver las dos columnas para ver de acuerdo a la ciudad de origen
 las frecuencias de los apellidos registrados:
 table(latabla$ciudad de origen, latabla$apellido)

 Me da, efectivamente la tabla que quiero, en las filas la ciudad de
 origen, en las columnas los apellidos, y en los campos, la frecuencia
 de apellidos por ciudad de origen.
 Sin embargo, la pregunta que tengo es que la tabla resultante genera
 una fila sin nombre, y una columna sin nombre, la primera fila y la
 primera columna, y le asigna un valor de 1, como si hubiera un dato, y
 al resto 0. Es decir, como si ese campo vacío con esa columna vacía
 generara un valor.
 He revisado la tabla, la he cambiado, pero no logrop quitarle eso.
 Por otra parte, y aún más importante, algunas ciudades, no todas, (de
 58, sólo 2), las repite como nombres de filas diferentes, aunque se
 trata del mismo nombre, lo coloca como si se tratara de dos distintos.
 Le cambié el nombre en excel y sigue haciendo lo mismo.
 No tengo idea del por qué sucede esto último. Las otras ciudades las
 usa como una sola fila y coloca los valores, a excepción de esas dos
 ciudades que las divide como si fueran diferentes, y las pone una
 debajo de la otra, dos veces el mismo nombre.
 ¿Alguna idea que puedan ofrecerme al respecto?
 De antemano, gracias a todos-.

 ___
 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