from:"Proyecto R\-UCA"

Re: [R-es] Cambiar el intervalo de confianza en un anova

2023-11-21 Por tema Proyecto R-UCA

Buenas,

En R, como en la mayoría del software estadístico, no se utiliza ningún nivel 
de confianza sino que lo que se calcula es el p-valor asociado
al contraste. De forma que cuanto más cerca de 0 esté el p-valor "menos 
credibilidad le damos a la hipótesis nula". Dicho mejor, debemos
rechazar la hipótesis nula si el p-valor está por debajo de nuestro nivel de 
confianza.

Por ejemplo, la primera línea del ejemplo:
   Df Sum Sq Mean Sq F value Pr(>F)   
TRAT 6 0.0028 0.00046   0.777  0.590   

El p-valor es el número que aparece en la última columna, es decir, para este 
contraste tenemos un p-valor de 0.590, esto es mayor que
cualquiera de los niveles de confianza que se utilizan habitualmente y, por 
tanto, la hipótesis nula nunca se va a rechazar.

Pero ¿cuál es la hipótesis nula? Cuando se trata de un parámetro la hipótesis 
nula es que el parámetro es 0, en este caso los parámetros son
los efectos de los tratamientos, es decir, la hipótesis nula es que los 
tratamientos no tienen efecto. Dado que no la hemos rechazado, la
conclusión es que no se puede rechazar la hipótesis de que los tratamiento no 
tiene efecto. Aunque es incorrecto, en este caso, la gente
suele decir que se acepta la hipótesis de que los tratamientos no tienen 
efectos diferentes.

Todos los p-valores se interpretan igual.

Un saludo.

P.D.: Esto no es una pregunta de R, es una pregunta de estadística.

-- 
--
http://knuth.uca.es/R
------
Proyecto R-UCA
--
Nombre: Manuel Muñoz Márquez
Departamento: Departamento de Estadística e Investigación Operativa
Institución: Escuela Superior de Ingeniería
Organización: Universidad de Cádiz
--


El mar, 21-11-2023 a las 12:43 +, Relloso Barrio, Juan Bautista escribió:
> Gracias Carlos.
> Yo también he visto el ejemplo que te pone chatGPT, pero la salida que te da 
> no soy capaz de interpretarla.
> Os paso las ordenes y las respuestas de R de la propuesta de chatGPT
>  
> Ejemplo.aov<- aov(P~TRAT+CORTE+REP)
> > summary (Ejemplo.aov)
>    Df Sum Sq Mean Sq F value Pr(>F)   
> TRAT 6 0.0028 0.00046   0.777  0.590   
> CORTE    2 0.5022 0.25110 424.542 <2e-16 ***
> REP  4 0.0026 0.00066   1.117  0.353   
> Residuals   92 0.0544 0.00059  
> ---
> Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
> > confianza_nueva <- 0.85
> > intervalos_confianza <- confint(Ejemplo.aov, level = confianza_nueva)
> > print(intervalos_confianza)
>    7.5 %    92.5 %
> (Intercept)  0.211291874  0.2361366979
> TRATCP  -0.022891346  0.0028913463
> TRATCPR -0.007558013  0.0182246797
> TRATCR  -0.008224680  0.0175580130
> TRATP   -0.007558013  0.0182246797
> TRATR   -0.011558013  0.0142246797
> TRATT   -0.008224680  0.0175580130
> CORTEC2 -0.065010796 -0.0481320614
> CORTEC3 -0.175010796 -0.1581320614
> REP2    -0.022323748 -0.0005333952
> REP3    -0.019466605  0.0023237476
> REP4    -0.025180890 -0.0033905381
> REP5    -0.023276129 -0.0014857762
>  
> He puesto 0,85 porque me piden una significación del 0.15%
> Ya me diréis.
>  Un saludo.
> Juan Bautista Relloso Barrio
> Coordinador de Equipos e Infraestructuras | Técnico de Cultivos del 
> Departamento de Producción Vegetal
> Talde eta Azpiegitura Koordinatzailea | Laborantza teknikaria Landare 
> Ekoizpen Departamentua
> jbauti...@neiker.eus| M. 688 62 98 14
> www.neiker.eus          
> ej_ekonomia_garapen_lateral  
> https://www.emakunde.euskadi.eus/contenidos/informacion/violencia_puntolila/eu_def/adjuntos/punto.lila.jpg
>  
> PRIBATUTASUN POLITIKA | POLÍTICA DE PRIVACIDAD | LEGAL NOTICE
>  
>  
>  
> De: Carlos Ortega  
> Enviado el: martes, 21 de noviembre de 2023 12:05
> Para: Relloso Barrio, Juan Bautista 
> CC: r-help-es@r-project.org
> Asunto: Re: [R-es] Cambiar el intervalo de confianza en un anova
>  
> Hola Juan,
>  
> ¿Qué tal?
>  
> Cuando preguntas a chatGPT por esto, te ofrece los intervalos de confianza a 
> un nivel de significación de 0.90 para los coeficientes, pero
> te advierte que si se quiere considerar otro nivel de significación dentro 
> del análisis ANOVA hay que tener otro enfoque, que aunque le
> preguntes no termina de aclarar.
>  
> #-- COEFICIENTES --
>  
> # Primero, cargamos tus datos y la librería necesaria
> # tus_datos <- read.csv("ruta/a/tus/datos.csv")
> 
> # Luego, realizamos el ANOVA con la función aov()
> # Aquí 'respuesta' es tu variable dependiente y 'factor1' y 'factor2'

Re: [R-es] Expresión en un objeto

2023-08-14 Por tema Proyecto R-UCA

Buenas,

¿Qué tal esto?

> V1 <- 1
> V2a <- 20
> V2b <- 200
> ORD <- "(ifelse (is.na (V2a) & ! is.na (V2b), V2b,  V2a))"
> V3 <- "((ORD - V1)/V1)*100"
> V33 <- sub('ORD', ORD, V3)
> V33
[1] "(((ifelse (is.na (V2a) & ! is.na (V2b), V2b,  V2a)) - V1)/V1)*100"
> eval(parse(text = V33))
[1] 1900

Un saludo

El vie, 11-08-2023 a las 12:30 +0200, Griera-yandex escribió:
> Gracias, Isidro, por la ayuda:
> 
> On Fri, 11 Aug 2023 09:16:34 +
> Isidro Hidalgo Arellano  wrote:
> 
> > A ver... con que xfunc() esté preparada para tomar un parámetro de tipo 
> > "carácter" y evaluarlo, claro que se puede hacer...
> > Si el problema lo tienes en evaluar la expresión, la función "eval()" te lo 
> > hace.
> > Si no te he entendido bien, explícate más 
> 
> Simplemente quería que en la orden:
> 
> V3 <- ((ORD - V1)/V1)*100
> 
> ORD lo reconocieses (y lo substituyese), por ejemplo, como "(ifelse (is.na 
> (V2a) & ! is.na (V2b), V2b,
> V2a))".
> 
> Con eval() no parece que funcione:
> 
> > ORD <- "(ifelse (is.na (V2a) & ! is.na (V2b), V2b,  V2a))"
> > V3 <- ((eval (ORD) - V1)/V1)*100
> Error in eval(ORD) - V1 : non-numeric argument to binary operator
> 
> Alguna sugerencia?
> 
> Gracias y saludos.
> 
> 
> > Saludos
> > Isidro
> > 
> > 
> > -Mensaje original-
> > De: R-help-es  En nombre de Griera
> > Enviado el: jueves, 10 de agosto de 2023 19:36
> > Para: r-help-es@r-project.org
> > Asunto: [R-es] Expresión en un objeto
> > 
> > Hola a todos:
> > 
> > Se me ha planteado un problema que no está ligado a ningún problema 
> > concreto. Es más teórico. 
> > 
> > Supongamos que tenemos tres variables:
> > 
> > V1  <- c (47, 71,  41,  23,  83, 152,  82,   8, 160,  18)
> > V2a <- c (NA, 36,  15,   5,  56,  18,  NA,   5,  NA,   5)
> > V2b <- c (37, NA,  15,  NA,  NA,  NA,  90,  NA,  161, NA)
> > 
> > Supongamos que tengo la expresión (que no puedo asignarlo a ninguna 
> > variable):
> > 
> > (ifelse (is.na (V2a) & ! is.na (V2b), V2b,  V2a))
> > 
> > Supongamos que tengo que utilizar esta expresión dos o más veces y no puedo 
> > utilizar ni un xapply () ni un bucle. Por ejemplo:
> > 
> > V3 <- (((ifelse (is.na (V2a) & ! is.na (V2b), V2b,  V2a)) - V1)/V1)*100
> > V4 <-   ifelse (! is.na ifelse (is.na (V2a) & ! is.na (V2b),
> > V2b,  V2a))-V1)/V1)*100), ifelse ifelse (is.na (V2a) & ! is.na (V2b), 
> > V2b,  V2a))-V1)/V1)*100 > 0, "1", "0"), NA)
> > 
> > Hay alguna forma de almacenar la expresión "(ifelse (is.na (V2a) & !
> > is.na (V2b), V2b,  V2a))" en un objeto y utilizar el nombre del objeto en 
> > las ordenes (por ejemplo, con una hipotética función xfunc
> > ()). Por
> > ejemplo:
> > 
> > ORD <- "(ifelse (is.na (V2a) & ! is.na (V2b), V2b,  V2a))"
> > V3 <- ((xfunc (ORD) - V1)/V1)*100
> > V4 <-   ifelse (! is.na (((xfunc (ORD)-V1)/V1)*100), ifelse
> > (((xfunc (ORD)-V1)/V1)*100 > 0, "1", "0"), NA)
> > 
> > 
> > El ejemnplo és absurdo, pero solo lo presento como un hipotético ejercicio.
> > 
> > Muchas gracias por la ayuda.
> > 
> > ___
> > R-help-es mailing list
> > R-help-es@r-project.org
> > https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!XN-cky8L5_OX7y2kyLLm27CRefYwg62XypISxc1W0ZPK_yu5yoIEqqRZK27otqN6Gvr0JcGQZ26m$
> >  
> 
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!XN-cky8L5_OX7y2kyLLm27CRefYwg62XypISxc1W0ZPK_yu5yoIEqqRZK27otqN6Gvr0JcGQZ26m$
>  

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

Re: [R-es] realizar ANOVAs en Loop

2023-07-18 Por tema Proyecto R-UCA

Buenas, Yesica:

La variable iteraccion parece una variable factor, en cuyo caso ¿no se debería 
incluir en el anova? en vez de repetir muchas veces el anova.

Si se trata de repeticiones también hay modelos anova con repeticiones.

En tu código estás haciendo el mismo anova muchas veces pues no cambias los 
datos en el bucle, además estás haciendo un análisis por cada
fila sin eliminar las repeticiones. Por otra parte no imprimes ni guardas nada 
dentro del bucle con lo que cuando sales lo que calculas ya
no está.

Prueba lo siguiente.

## Extraer los valores de iteraccion sin repeticiones
iter <- levels(factor(data$iteraccion))

for(i in iter) {
   ## Hacemos el análisis quedándonos con las filas correspondientes
   res = aov(valor~Grupo, data=datos[datos$iteraccion == iter,])
   print(summary(res))
 }

Un saludo.

P.D.: No lo he probado, puede que tenga alguna errata.

El mar, 18-07-2023 a las 08:25 +0200, Yesica Pallavicini Fernandez escribió:
> Buenos días y gracias de antemano por vuestra ayuda.
> 
> Necesito realizar una serie de ANOVAS en loop.
> Os adjunto unos datos ficticios en este email.
> Dichos datos tienen 3 variables: 
> 1)Valor: corresponde a la variable dependiente y es numérica
> 2) Grupo: Corresponde a la variable independiente y es u factor
> 3) Iteracción: Corresponde a la variable sobre la cual hay que repetir los 
> ANOVAs con las variables anteriores y es un factor.
> 
> Abajo os pego el código con el que he estado trabajando pero que no lo tengo 
> bien, porque no puedo acceder a los resultados.
> Os agradeceria mucho si:
> -Me podéis ayudar a mejorar este código para que funcione
> -Si me podéis sugerir alguna fuente que explique bien cómo hacer un loop 
> porque no he dado con los blogs adecuados.
> -Que me digáis cuál es vuestro libro/web de estadística favorito para 
> profundizar en la matemática detrás de los análisis.
> 
> Mil gracias compañeros
> Yésica
> 
> library(agricolae)
> library(readxl)
> datosa_fict <- read_excel("datosa-fict.xlsx")
> #Cambiar nombre a la base de datos
> datos=datosa_fict
> #Copiar la variable sobre la que hacer el loop
> 
> iter=datos$iteraccion
> #Crear el loop
> for(i in iter) {
>   res=aov(valor~Grupo,data=datos)
>  
> }
> #Salvar los resultados
> ANOVA(res)
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!VjLSaDKJejCZoZy1TgKKYQML4mA7DfvcDtUBYj5iRpdFNSsGUU5lEYtfkt0EYWTPD_-5HztE7U6zv48$
>  

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

Re: [R-es] Error RStudio

2023-06-19 Por tema Proyecto R-UCA

Buenas, 

Yo diría que se trata de un fichero de trabajo que está intentando cargar al 
inicio y que falla.

Busca un fichero .rs.WorkingDataEnv y bórralo. Si aún así sigue dándote el 
fallo busca ficheros .RData y bórralos.

Nota: Son nombres de fichero no extensiones y, por tanto, no llevan nada 
delante del punto.

Un saludo.
-- 
--
http://knuth.uca.es/R
--
Proyecto R-UCA
--
Nombre: Manuel Muñoz Márquez
Departamento: Departamento de Estadística e Investigación Operativa
Institución: Escuela Superior de Ingeniería
Organización: Universidad de Cádiz
--

El dom, 18-06-2023 a las 03:04 +0200, Javier Gómez Gonzalez escribió:
> Hola a todos
> 
> Desde que instalé la última versión de RStudio la 2023.06.0-421 para
> Windows me aparece el siguiente error :
> 
> Error in exists(cacheKey, where = .rs.WorkingDataEnv, inherits = FALSE) :
>   invalid first argument
> Error in assign(cacheKey, frame, .rs.CachedDataEnv) :
>   attempt to use zero-length variable name
> 
> La versión de R que tengo es la 4.3 y el sistema operativo es Windows 10.
> 
> Un saludo
> 
>     Javier Gómez González
> 
> [[alternative HTML version deleted]]
> 
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!ReVoQrWyTd6D01skNmHh-ezD_3CKh1HvZ8oxfTCOskCfF69nCv-CYmf1UYoIqnU7SvXz6BEV-IcImeM$
>  

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

Re: [R-es] Supuestos de una ANOVA

2023-06-17 Por tema Proyecto R-UCA

Buenas,

La instrucción plot admite un parámetro which, su valor por defecto es c(1, 2, 
3, 5), que son los cuatro gráficos que salen por defecto.
Usando which = 2 obtienes únicamente el qqplot.

Las observaciones leverage son observaciones que tienen una gran influencia en 
los resultados del análisis, de forma que eliminarlas supone
un cambio importante en las estimaciones. No hay que confundirlas con los 
outliers o atípicos, pues una observación puede ser atípica y no
leverage, o ser leverage y no atípica.

Un saludo
-- 
--
http://knuth.uca.es/R
--
Proyecto R-UCA
--
Nombre: Manuel Muñoz Márquez
Departamento: Departamento de Estadística e Investigación Operativa
Institución: Escuela Superior de Ingeniería
Organización: Universidad de Cádiz
--

El vie, 16-06-2023 a las 12:41 +0200, Yesica Pallavicini Fernandez escribió:
> Buenos días y muchas gracias por adelantado
> En cuando a probar gráficamente los supuestos de normalidad y
> homocedasticidad de una ANOVA
> 
> Lo estoy haciendo de forma gráfica de la siguiente manera:
> Primero hago el nova con: aov()
> luego hago la comprobación de los supuestos con: plot(modelo)
> y me salen 4 gráficos;
> 1 un scatter plot de los "residuals" vs " Fitted",
> 2"standardizez residuals" vs " Fitted",
> 3QQplot,
> 4 Residuals vs leverage
> Pero ¿Qué es el leverage?
>  1)¿teneis algun script que reemplace a plot(modelo) y que solo contenga el
> QQplot y los valores residuales frente a los fitted?
> 
> 2) Shapiro.test () no funciona para observaciones mayores a 500 y mis datos
> tienen más de 3 observaciones. ¿sabeis de algun otro test para este
> caso?
> 
> Muchísimas gracias y que acabéis fenomenal la semana
> 
> [[alternative HTML version deleted]]
> 
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!S2L6bI_NoCf_ox_hHI7PINlx5SKlSS1KpBOsabN8o1Z248Rp3TRh5axwIvBUT1g9XZtvU7qL25KUdwc$
>  

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

Re: [R-es] Seleccionar valores consecutivos en un dataframe

2023-06-17 Por tema Proyecto R-UCA

Buenas, 

Creo que esto se parece a lo estás buscando, un saludo.

> ejemplo <- read.csv('ejemplo.csv', header=TRUE, sep = ' ')
> head(ejemplo)
 dia p   lim trat   sp  germ estac
1 2019-11-07 0.000 brown gfgs aege FALSE  fall
2 2019-11-08 0.000 brown gfgs aege FALSE  fall
3 2019-11-09 0.000 brown gfgs aege FALSE  fall
4 2019-11-10 0.079 black gfgs aege  TRUE  fall
5 2019-11-11 0.084 black gfgs aege  TRUE  fall
6 2019-11-12 0.081 black gfgs aege  TRUE  fall
> index <- which(diff(ejemplo$germ) != 0)
> ejemplo$cs <- cumsum(ejemplo$p)
> d <- diff(ejemplo$cs[index])
> d
 [1] 0.647 0.000 0.358 0.000 0.259 0.000 0.706 0.000 0.041 0.000 0.698 0.000
[13] 0.052
> d[seq(1, length(d), by = 2)]
[1] 0.647 0.358 0.259 0.706 0.041 0.698 0.052



-- 
--
http://knuth.uca.es/R
----------
Proyecto R-UCA
--
Nombre: Manuel Muñoz Márquez
Departamento: Departamento de Estadística e Investigación Operativa
Institución: Escuela Superior de Ingeniería
Organización: Universidad de Cádiz
--

El vie, 16-06-2023 a las 09:27 +0200, Jaume Tormo via R-help-es escribió:
> Estimados eRReros,
> 
> Tengo un df como el adjunto (en txt y como objeto de R)
> Como veréis hay una columna T/F que se llama germ y cada fila corresponde a 
> datos de un día.
> Me gustaría que R fuera siguiendo la columna germ y en cada serie de días con 
> TRUE sumara el valor de la columna p. Se trata de saber si
> en esa serie de días con valor T el total de p es mayor que 1 o no.
> He hecho algo parecido con rle() que me cuenta la longitud de las series de 
> TRUE, pero este siguiente paso no se como darlo.
> Si uso apply o subset me toma todas las filas del df con T en la columna 
> germ. Lo que no se el como decirle a R que empiece por el
> principio y vaya tomando grupo a grupo.
> Me imagino que podría llegar a construir un bucle que lo hiciera, pero no 
> quiero pasarme tres horas dándole vueltas si hay una función o
> combinación de funciones que lo hace ¿Alguna sugerencia o me pongo ya con el 
> bucle?
> 
> Muchas gracias.
> 
> Jaume.
> 
> 
> -- 
> Dr. Jaume Tormo.
> Area of Ecology
> Department of Agrarian and Environmental Sciences
> Technological College. Agri-food and Environment
> University of Zaragoza, Spain
> 0034 974292678
> https://flipboard.com/@jaumetormo/hallazgos-interesantes-bj8opmboy
> https://acercad.wordpress.com/
> 
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!X47Y3pOTwgTP8nnGrIAHAsqLIj41GL5Y_qVAKxL4V2xowSx0jdjNJQv9Zz6Lh2Rtb2ThSaKAeDHRi_WbaMQ$
>  

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

Re: [R-es] Nuevo conjunto de datos

2023-06-06 Por tema Proyecto R-UCA

Buenas:

He hecho la prueba y en la versión de R-Commander en cran ocurre como dices. No 
veo el motivo.

Pero he instalado la versión de desarrollo de R-Commander con la instrucción
install.packages(c('Rcmdr', 'RcmdrMisc'), repos="http://R-forge.R-project.org;)

y la opción aparece.

Lo habitual es que a final de cada verano se libere una nueva versión de 
R-Commander, así que a partir de entonces la versión en cran
debería funcionar.

Un saludo.

El mar, 06-06-2023 a las 13:00 -0400, Ps. Félix Pérez V. escribió:
> El 06-06-23 a las 06:24, Proyecto R-UCA escribió:
> > Buenas, Félix:
> Hola buenas  Gracias por contestar.
> > 
> > No veo motivo para ello.
> > 
> > He instalado manjaro en una máquina virtual, pero:
> > * ¿Qué escritorio has instalado? Yo he instalado el que viene con la imagen 
> > reducida.
> 
> Trabajo con Xfce 4.18
> 
> Manjaro 6.3.5-2  en otra máquina con 6.3.5-1 pasa lo mismo y con 6.2.x idem
> 
> > * ¿Cómo has instalado R y Rcmdr? No encuentro la forma de hacerlo.
> 
> R lo instalo a través de pacman:  pacman -S r
> 
> Luego en un terminal ejecuto R,  dentro de R
> 
> install.packages("Rcmdr", dependencies=T)
> 
> y ejecuto con library(Rcmdr)
> 
> Hasta ahí todo bien.  Adjunto una captura (si es que llega)
> 
> > 
> > Si me ayudas un poco lo pruebo.
> Gracias!
> > 
> > Un saludo.
> > 
> > El sáb, 03-06-2023 a las 16:11 -0400, Ps. Félix Pérez V. escribió:
> > > Hola, buenas estimados.
> > > 
> > > Acabo de instalar, después de algún tiempo,  R versión 4.3  y Rcommander
> > > en Manjaro Linux, 6.3.5  Y me he dado cuenta que no existe la opción de
> > > crear un Nuevo conjunto de datos.
> > > 
> > > ¿eso es así ahora?
> > > 
> > > Muchas gracias por su tiempo.
> > > 
> > > Saludos.
> > > 
> > ___
> > R-help-es mailing list
> > R-help-es@r-project.org
> > https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!Qw2TX9gd3kTkPvlOieXK1lqO8GE8lKT2Wy7wzd1vv96T9veodGMDXYvzQzGOnhyTowqxekioJb2ZKNLNgYQryQ$
> >  
> 
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!Qw2TX9gd3kTkPvlOieXK1lqO8GE8lKT2Wy7wzd1vv96T9veodGMDXYvzQzGOnhyTowqxekioJb2ZKNLNgYQryQ$
>  

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

Re: [R-es] Nuevo conjunto de datos

2023-06-06 Por tema Proyecto R-UCA

Buenas, Félix:

No veo motivo para ello.

He instalado manjaro en una máquina virtual, pero:
* ¿Qué escritorio has instalado? Yo he instalado el que viene con la imagen 
reducida.
* ¿Cómo has instalado R y Rcmdr? No encuentro la forma de hacerlo.

Si me ayudas un poco lo pruebo.

Un saludo.

El sáb, 03-06-2023 a las 16:11 -0400, Ps. Félix Pérez V. escribió:
> Hola, buenas estimados.
> 
> Acabo de instalar, después de algún tiempo,  R versión 4.3  y Rcommander 
> en Manjaro Linux, 6.3.5  Y me he dado cuenta que no existe la opción de 
> crear un Nuevo conjunto de datos.
> 
> ¿eso es así ahora?
> 
> Muchas gracias por su tiempo.
> 
> Saludos.
> 

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

Re: [R-es] ayuda sobre grafico de barras simple

2023-05-31 Por tema Proyecto R-UCA

Buenas, José:

En una lista de software libre es preferible no usar formatos privativos de 
archivos como los que utiliza Microsoft.

Las instrucciones siguientes hacen un gráfico de barras:
x <- rbinom(10, 20, .3)
barplot(table(x))

¿Los valores no se corresponden con una variable cuantitativa discreta? En caso 
contrario no es ese el gráfico que debe usarse.

Un saludo.


-- 
--
http://knuth.uca.es/R
--
Proyecto R-UCA
--
Nombre: Manuel Muñoz Márquez
Departamento: Departamento de Estadística e Investigación Operativa
Institución: Escuela Superior de Ingeniería
Organización: Universidad de Cádiz
--


El mié, 31-05-2023 a las 14:55 -0400, Jose Betancourt Bethencourt escribió:
> Estimados
> 
> mi pregunta viene en archivo adjunto
> 
> saludos
> José
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!XqMLNpizJGItFNcLlVaD1vaSzng5UjUXgQR3uDGGDDb4RrDrXvhBziOOcA8knGBgnxvH4O3aOZNQmnU$
>  

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

Re: [R-es] Error al actualizar R 4.3.0

2023-05-08 Por tema Proyecto R-UCA

Buenas,

Según
https://stackoverflow.com/questions/14524449/how-to-install-r-packages-via-proxy-user-password

el problema puede ser que estés estableciendo únicamente el proxy para el 
protocolo http, lo tienes que establecer para http y https.

Además tienes que hacerlo antes de intentar descargar nada, si lo haces después 
no funcionará,

Un saludo, Manuel

El jue, 04-05-2023 a las 08:45 -0300, Sebastián Kruk Gencarelli escribió:
> Hola usuarios-R.
>  
> El lunes pasado en mi máquina Windows 10 el R 4.2.3 a 4.3.0.
>  
> Una vez instalado dejó de funcionar la actualización.
>  
> Me aparece lo siguiente:
>  
> >update.packages()
> Warning: unable to access index for repository 
> https://cloud.r-project.org/src/contrib:
>   no fue posible abrir la URL 
> 'https://cloud.r-project.org/src/contrib/PACKAGES'
>  
> Es un equipo en el trabajo y estoy bajo un proxy. No soy administrador.
>  
> No me funcionó cambiar el proxy usando Sys.setenv pero si si hago 
> update.packages(method = "wininet") con los consiguientes warnings.
>  
> ¿Hay alguna forma de solucionarlo yo sin privilegios de administrador o 
> preciso de un administrador?
>  
> Saludos y gracias de antemano,
>  
> Sebastián.
>  
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!Tf6Lpg8ZiPobrqgQnBnJUjUrKVJzKJbOc_2DcvE_oAwTqq3k9Mvi8NcuaYzrb5kh-1IOPboauFsMjQsssC_G$
>  

[[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] preguntas múltiples y creación de variables

2023-03-21 Por tema Proyecto R-UCA

Buenas,

las imágenes no se ven por lo que no puedo reproducir tu ejemplo, pero tal vez 
lo siguiente te valga:
> library('stringr')
> d <- data.frame(respuestas = c('manzana, naranja', 'manzana, melocotón', 
> 'naranja, melocotón'))
> d
  respuestas
1   manzana, naranja
2 manzana, melocotón
3 naranja, melocotón
> d$manzana <- sapply(d$respuestas, FUN = str_detect, 'manzana', simplify = 
> TRUE)
> d$naranja <- sapply(d$respuestas, FUN = str_detect, 'naranja', simplify = 
> TRUE)
> d
  respuestas manzana naranja
1   manzana, naranjaTRUETRUE
2 manzana, melocotónTRUE   FALSE
3 naranja, melocotón   FALSETRUE

Un saludo, Manuel.

El lun, 20-03-2023 a las 17:09 -0300, juan manuel dias escribió:
> Hola, cómo andan!
> 
> Tengo el siguiente problema.
> 
> Tengo una pregunta cuya respuesta es múltiple, pero en en la base están
> todas las respuestas en una misma variable y cada respuesta está
> separada por ",".
> 
> Así está
> 
> [image: image.png]
> 
> Hago esto para poder separar en columnas las distintas respuestas:
> 
> 
> 
> 
> 
> *mult_bas_dat<-mult_bas_dat %>%  separate_rows(bases, sep = ",") %>%
> mutate(basedatos = str_squish(bases)) %>%  select(basedatos)*
> ## múltiple a columnas ##
> 
> 
> 
> 
> 
> *mult_bas_dat_final<-mult_bas_dat %>%  separate_rows(basedatos, sep = ",")
> %>%  mutate(basedatos = str_squish(basedatos), # Para quitar los espacios
> en blanco indeseados id = 1) %>%  spread(key = basedatos, value =
> id)*
> 
> ## na's a 0 ##
> 
> *mult_bas_dat_final[is.na
>  $ >(mult_bas_dat_final)] <- 0*
> # limpio los nombres #
> 
> *mult_bas_dat_final <- mult_bas_dat_final %>%  clean_names()*
> 
> ## cambio nombres a cada opción de bases ##
> *mult_bas_dat_final=rename(mult_bas_dat_final,
> c(excel="p5.1",sheets="p5.2",sql_server_microsoft="p5.3",mongo_db="p5.4",access="p5.5",oracle="p5.6",mysql="p5.7",postgre_sql="p5.8"))*
> 
> Me queda así
> 
> [image: image.png]
> 
> El tema es que cuándo quiero correr el siguiente código:
> 
> 
> 
> 
> 
> 
> 
> *mutate(puntaje_p4_p5=case_when(p4_bases_prop==1 & p5.1==1 ~ 0.4,
>    p4_bases_prop==1 & p5.2==1 ~ 0.5,
>  (p4_bases_prop==1) & ((p5.1==1) & (p5.3==1) | (p5.4==1) |
> (p5.6=1) | (p5.7==1) | (p5.8==1)) ~  1,
>  (p4_bases_prop==1) & ((p5.2==1) & (p5.3==1) | (p5.4==1) | (p5.6=1) |
> (p5.7==1) | (p5.8==1)) ~  1,
>  (p4_bases_prop==1) & ((p5.5==1) & (p5.3==1) | (p5.4==1) | (p5.6=1) |
> (p5.7==1) | (p5.8==1)) ~  1,
>  (p4_bases_prop==1) & (p5.3==1 | p5.4==1 | p5.6==1 | p5.7==1 | p5.8==1) ~
> 1, p4_bases*_prop==1  &  p5.5==1 ~ 0.6,
> 
> Sale el siguiente error porque no encuentra una de las variables que están
> en los condicionales, en este caso p5.3, pero podría ser cualquier otra.
> 
> [image: image.png]
> 
> Necesito para todos los casos generar tantas columnas como posibilidades de
> respuesta tengo en esa pregunta, más allá de las respuestas generadas.
> 
> Las posibles respuestas son: excel, sheets, sql_server_microsoft,
> mongo_db, access, oracle, mysql, postgre_sql
> 
> Por ejemplo, este caso que respondió así:
> 
> *"excel, sheets, oracle, postgre_sql"   *
> 
> Necesitaría que quede así
> 
> [image: image.png]
> 
> Y así con todos los casos, por ejemplo, si solo respondió "*excel",
> *necesitaría
> que quede así:
> 
> [image: image.png]
> 
> Estoy intentando hacerlo pero sin resultados!
> 
> Muchas gracias! Juan.
> 
> [[alternative HTML version deleted]]
> 
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!TsC3j72nXLD-S9sKeaG-5pjChVYrV50lLQSZr1EC7xry6qlcSxhH2t-I-jcHTbshUTYCwdUvoDzCjq4$
>  

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

Re: [R-es] SD

2023-03-15 Por tema Proyecto R-UCA

Buenas, Jose:

Pues para hacer eso necesitas saber:
1. De que intervalo de confianza se trata, por ejemplo el intervalo de 
confianza de la varianza conocida la media en una población normal
2. Su expresión, por ejempo en la tabla 9, página 73 del capítulo 3 del libro 
[1], se puede ver que para el caso anterior la expresión es
(n S_mu^2 / Chi^2_{n,1-alpha/2}, n S_mu^2 / Chi^2_{n,alpha/2})
3. El tamaño muestral usado, en la expresión anterior n
4. El nivel de confianza 1- alpha, o de significación, alpha.

Ya solo queda sustituir y despejar.

En el mismo libro tienes intervalos de confianza para otras distribuciones y 
parámetros.

Un saludo, Manuel

[1] Inferencia Estadística. http://knuth.uca.es/l_inf

El mié, 15-03-2023 a las 07:19 -0400, Jose Betancourt Bethencourt escribió:
> Estimados
> Como se puede calcular la desviación estandar a partir de un intervalo
> de confianza?

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

Re: [R-es] str_replace por orden de aparición en una cadena.

2023-03-14 Por tema Proyecto R-UCA

Buenas,

Una opción es partir la cadena usando el == como separador y luego recomponerla.

> a <- "p1 == 1 o 2 o p2 == 1 == 1,3"
> b <- strsplit(a, "==")
> b <- b[[1]]
> b
[1] "p1 " " 1 o 2 o p2 " " 1 " " 1,3" 
> paste0(paste0(b[1:(length(b)-1)], collapse = '=='), '=', b[length(b)])
[1] "p1 == 1 o 2 o p2 == 1 = 1,3"

Un saludo, Manuel.

El lun, 13-03-2023 a las 19:15 -0300, juan manuel dias escribió:
> hola ,muchas gracias!
> no conocía esa librería para los regex...respecto a la pregunta de Carlos, 
> puedo tener más de un == dentro de la cadena, por ejemplo así: 
> 
> así está
> si p1 == 1 o 2 o p2 == 1  == 1,3
> 
> así necesito
> si p1 == 1 o 2 o p2 == 1  = 1,3
> 
> El lun, 13 mar 2023 a las 18:11, Juan Abasolo () 
> escribió:
> > Mientras aparezca alguien que sepa guiarte bien, te muestro desde mi 
> > autodidactez por dónde encararía. Y lo que para mí fue un gran
> > descubirmiento: El paquete RegExplain,
> > irudia.png
> > (==)([\d, \w]*=[\d, \w]*)$
> > 
> > Eso captura en dos grupos diferentes todo lo que está desde el final hasta 
> > el primer igual, más todo lo que sigue hasta en igual doble,
> > que lo excluye y lo captura como otro grupo. 
> > Tenés que conseguir cambiar solamente el primer grupo. Y se me acabó la 
> > sapienza.
> > 
> > Suerte
> > 
> > 
> > Hau idatzi du juan manuel dias (juamad...@gmail.com) erabiltzaileak (2023 
> > mar. 13(a), al. (20:38)):
> > > Hola,
> > > 
> > > Tengo una variable string que tiene muchos casos, pero necesito en cada 
> > > uno
> > > de ellos reemplazar el último "==" por "=".
> > > 
> > > asi está asi necesito
> > > si p1 == 1 o 2 == 1,3 si p1 == 1 o 2 = 1,3
> > > si p1 == 3 o 4 == 1 si p1 == 3 o 4 = 1
> > > si p1 == 5 == 0,7 si p1 == 5 = 0,7
> > > si p1 == 5 = 0,7 si p1 == 5 = 0,7
> > > si p1 == 6 == 0 si p1 == 6 = 0
> > > si p1 == 7 == no aplica si p1 == 7 = no aplica
> > > 
> > > Muchas gracias!!
> > > 
> > > Juan.
> > > 
> > >         [[alternative HTML version deleted]]
> > > 
> > > ___
> > > R-help-es mailing list
> > > R-help-es@r-project.org
> > > https://stat.ethz.ch/mailman/listinfo/r-help-es
> > 
> > 
> > -- 
> > Juan Abasolo, PhD
> > 
> > Hizkuntzaren eta Literaturaren Didaktika Saila | EUDIA ikerketa taldea
> > Bilboko Hezkuntza Fakultatea
> > Euskal Herriko Unibertsitatea UPV/EHU
> > 
> > Sarriena auzoa z/g 48940 - Leioa (Bizkaia)
> > 
> > T   : (+34) 94 601 7567
> > Telegram: @JuanAbasolo
> > Skype   : abasolo72
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!VOrNkgAM8xLYFPl5_ay-jsI027eLRwjwkMr-dYzea-A82uQTihgPogjnFoc9QhaJ8smUDai2GjBMY1g$
>  
___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Re: [R-es] reemplazar valores en texto según condiciones

2023-03-09 Por tema Proyecto R-UCA

Buenas,

Se me hace raro que la función no admita un parámetro para eso.

Una opción es hacerlo en dos pasos:
P1: Reemplaza p10, p20, ... por algo como q10, q20, ...
P2: Haz el reemplazo que quieres.

Igualmente puedes hacer el reemplazo que haces y en un segundo paso reemplazar 
p10_integra_datos por p10_cuales_rep, ...

Un saludo, Manuel.

El jue, 09-03-2023 a las 10:20 -0300, juan manuel dias escribió:
> Hola,
> Algo que me está pasando con esta función es lo siguiente:
> A "p1" lo tengo que reemplazar por "p1_integra_datos" y a "p10" por
> "p10_cuales_rep", pero como p10 contiene p1, y así pasa con otras preguntas
> (p2 y p20, por ejemplo),
> me los reemplaza en ambas, cuándo lo que busco es otra cosa.
> 
> reglas$condicion_final <- stri_replace_all_fixed(reglas$condicion_minus,
> c("p1","p2","p3","p4","p5","p6","p7","p8","p9","p10"),
> c("p1_integra_datos","p2_recop_dat","p3_como_recop","p4_bases_prop","p5_cuales_bases",
> "p6_cuanto_integ_dat","p7_tec_integr_dat","p8_documen_pol_int","p9_report_dat","p10_cuales_rep"),
> vectorize_all = FALSE)
> 
> Se les ocurre como resolverlo, estoy agregando un guión bajo después de
> cada pregunta p1_ p10_ para que esto no pase, pero no se me ocurre
> como hacerlo en el código.
> 
> Muchas gracias! Juan.
> 
> El mar, 7 mar 2023 a las 14:11, Carlos Ortega ()
> escribió:
> 
> > Hola,
> > 
> > Dentro de la librería "stringi" tienes la posibilidad de hacer lo que
> > quieres de forma vectorizada y super eficiente.
> > De esta forma..:
> > 
> > library(stringi)
> > texto_nuevo <- stri_replace_all_fixed(texto, c('p1', 'p2'),
> > c('p1_integra_datos', 'p2_recop_dat'), vectorize_all = FALSE)
> > 
> > Gracias,
> > Carlos Ortega
> > https://urldefense.com/v3/__http://www.qualityexcellence.es__;!!D9dNQwwGXtA!SO5aun-Yamxtje74i5V9XQrQWI1Q_2DNWSIHAcTX9KKrRMnoOhf63fSSytvNHICE1skDvn91OxPAun4$
> >  
> > 
> > El mar, 7 mar 2023 a las 18:04, juan manuel dias ()
> > escribió:
> > 
> > > Hola, como andan! Espero que bien!
> > > Tengo dos bases, A) tiene una variable texto en la que deseo reemplazar
> > > ciertas partes y B) tengo las condiciones para cambiar ese texto de la
> > > base
> > > A.
> > > 
> > > Base A
> > > 
> > > texto
> > > si p1 = 1 o 2 = 1,3
> > > si p1 = 3 o 4 = 1
> > > si p1 = 5 = 0,7
> > > si p1 = 5 = 0,7
> > > si p1 = 6 = 0
> > > si p1 = 7 = "no aplica"
> > > si p2 = 1 & p3 = 1 = 0,5
> > > si p2 = 1 & p3 = 2 = 0,7
> > > si p2 = 1 & p3 = 4 o 3 = 1
> > > si p2 = 1 & p3 = 5 = 0,5
> > > si p2 = 1 & p3 = 6 = 0,5
> > > si p2 = 2 = 0
> > > si p2 = 3 = 0
> > > si p2 = 4 = no aplica
> > > Base B
> > > 
> > > texto_a_reemplazar_en_base_A texto_final_en_A
> > > p1 p1_integra_datos
> > > p2 p2_recop_dat
> > > 
> > > Lo estoy haciendo con condiciones IF ELSE pero se me hace un código muy
> > > largo.
> > > Estoy probando de armar un for que recorra base A y lo reemplace por el
> > > texto que está en Base B.
> > > 
> > > Si alguno se le ocurre más que agradecido!
> > > 
> > > Gracias! Juan.
> > > 
> > >     [[alternative HTML version deleted]]
> > > 
> > > ___
> > > R-help-es mailing list
> > > R-help-es@r-project.org
> > > https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!SO5aun-Yamxtje74i5V9XQrQWI1Q_2DNWSIHAcTX9KKrRMnoOhf63fSSytvNHICE1skDvn91JE_WlVY$
> > >  
> > > 
> > 
> > 
> > --
> > Saludos,
> > Carlos Ortega
> > https://urldefense.com/v3/__http://www.qualityexcellence.es__;!!D9dNQwwGXtA!SO5aun-Yamxtje74i5V9XQrQWI1Q_2DNWSIHAcTX9KKrRMnoOhf63fSSytvNHICE1skDvn91OxPAun4$
> >  
> > 
> 
> [[alternative HTML version deleted]]
> 
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!SO5aun-Yamxtje74i5V9XQrQWI1Q_2DNWSIHAcTX9KKrRMnoOhf63fSSytvNHICE1skDvn91JE_WlVY$
>  

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

Re: [R-es] Realizar anovas, por cada uno de los niveles de uno de los factores del ensayo

2023-03-02 Por tema Proyecto R-UCA

Buenas,

Pide ayuda con ?by, by es una instrucción general y no específica de ANOVA y lo 
que hace es construir los grupos y luego aplicar la función.
En este caso teniendo dos grupos la ganancia va a ser poca.

En cualquier caso, según lo que estés haciendo sería más apropiado considerar 
Variedad como un factor y hacer un ANOVA multivariante o
MANOVA.

Un saludo.

El jue, 02-03-2023 a las 19:21 +, Relloso Barrio, Juan Bautista escribió:
> Buenas tardes.
> Tengo un ensayo de dos factores (Variedad y dosis)
> Quisiera hacer anovas para cada una de las dos variedades que estoy evaluando.
> Lo puedo hacer cogiendo los datos primero de una variedad y luego de la otra.
> Pero creo que hay un comando “by variedad” que lo hace si necesidad de andar 
> modificando el archivo de datos. Pero no sé dónde hay que
> colocarlo.  
> Si alguno me puede ayudar. Gracias.
> Un saludo.
> Juan Bautista Relloso Barrio
> Coordinador de Equipos e Infraestructuras | Técnico de Cultivos del 
> Departamento de Producción Vegetal
> Talde eta Azpiegitura Koordinatzailea | Laborantza teknikaria Landare 
> Ekoizpen Departamentua
> jbauti...@neiker.eus| M. 688 62 98 14
> www.neiker.eus          
> ej_ekonomia_garapen_lateral  
> https://www.emakunde.euskadi.eus/contenidos/informacion/violencia_puntolila/eu_def/adjuntos/punto.lila.jpg
>  
> PRIBATUTASUN POLITIKA | POLÍTICA DE PRIVACIDAD | LEGAL NOTICE
>  
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!WuX3rIysV1u0kGMhrJLZ51b4uHdCE-9eGbcjuSkhdmBJyZmPu3yhZQgWZVCJRwaNpSf34NPwpOVrOMQfGg$
>  

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

Re: [R-es] Suma de datos de una tabla

2023-01-19 Por tema Proyecto R-UCA

Buenas, 

Creo que el siguiente código hace lo que pides, cambiando Chile y las columnas 
por los de tu caso.

library(carData)
data(Chile)
indice <- sort(unique(Chile$population))

f <- function(valor, data, indice) {
sum(data[indice == valor], na.rm = TRUE)
}

## Una lista con las sumas de income según population
lapply(indice, f, Chile$income, Chile$population)

ff <- function(data, indice) {
index <- sort(unique(indice))
lapply(index, f, data, indice)
}

## Una lista con tantos elementos como columnas
## Cada elemento es una lista con los valores de las sumas
data <- Chile[, c('population', 'income')]
apply(data, 2, ff, Chile$population)

Manuel, un saludo



El mié, 18-01-2023 a las 14:14 -0500, David Camilo Gomez Medina escribió:
> No sé si olvidé aclarar, pero quiero crear una lista para cada columna y así 
> almacenar esos valores.
> 
> On Wed, 18 Jan 2023 at 14:13, David Camilo Gomez Medina 
>  wrote:
> > Hola Carlos.
> > 
> > Por ejemplo la segunda columna (16040050), quiero sumar todos los datos de 
> > esa columna correspondientes al año 2000 (quiero
> > relacionarlos con la primera columna donde está la fecha) y ese valor 
> > almacenarlo en una lista y así sucesivamente con los demás años y
> > con las demás columnas.
> > 
> > Tengo pensado una lista así:
> > 
> > est_16040050 
> > 
> > [[2000]]
> > [1] 2.3
> > 
> > [[2001]]
> > [1] 1.7
> > 
> > [[2002]]
> > [1] 4.8
> > 
> > Quedo muy atento a sus sugerencias o guías.
> > 
> > Saludos.
> > 
> > On Wed, 18 Jan 2023 at 13:52, Carlos Ortega  
> > wrote:
> > > Hola, 
> > > 
> > > Por entenderlo mejor, quieres que para las filas, para cada año:
> > >    1. se sumen las columnas y por tanto tengas tantas sumas como columnas.
> > >    2. o sumar todas las columnas y obtener una única suma.
> > > Gracias,
> > > Carlos Ortega
> > > www.qualityexcellence.es
> > > 
> > > El mié, 18 ene 2023 a las 19:29, David Camilo Gomez Medina 
> > > () escribió:
> > > > Hola, espero que se encuentren muy bien.
> > > > 
> > > > Tengo una tabla de datos de precipitación y quiero sumar por columnas y 
> > > > así obtener la precipitación anual. Es decir, quiero sumar
> > > > solo los datos del año 2000 y guardarlos en una lista y así 
> > > > sucesivamente con los demás años, pero no encuentro todavía una función
> > > > o una manera eficiente de hacerlo. 
> > > > 
> > > > Agradecería mucho si alguien me puede guiar.
> > > > 
> > > > Saludos
> > > > 
> > > > image.png
> > > > 
> > > > Aviso legal: El contenido de este mensaje y los archivos adjuntos son 
> > > > confidenciales y de uso exclusivo de la Universidad Nacional
> > > > de Colombia. Se encuentran dirigidos sólo para el uso del destinatario 
> > > > al cual van enviados. La reproducción, lectura y/o copia se
> > > > encuentran prohibidas a cualquier persona diferente a este y puede ser 
> > > > ilegal. Si usted lo ha recibido por error, infórmenos y
> > > > elimínelo de su correo. Los Datos Personales serán tratados conforme a 
> > > > la Ley 1581 de 2012 y a nuestra Política de Datos Personales
> > > > que podrá consultar en la página web www.unal.edu.co. Las opiniones, 
> > > > informaciones, conclusiones y cualquier otro tipo de dato
> > > > contenido en este correo electrónico, no relacionados con la actividad 
> > > > de la Universidad Nacional de Colombia, se entenderá como
> > > > personales y de ninguna manera son avaladas por la Universidad.
> > > > ___
> > > > 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://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!Tgeig9lQK2J7Ho1714GCysi3CyV1Wuw9nLrzOWXrbyFyjgdlIlc5RIm24iXMtqtfVhg0EZrc2a06dVQLIOE$
> > >  

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

Re: [R-es] Sumar positivos y negativos por separado

2023-01-02 Por tema Proyecto R-UCA

Hola,

He usado el data.frame Chile, pero puedes usar cualquier otro.

De las sumas se han omitido los NA, de lo contrario la suma siempre saldría NA. 
Además para las columnas no numéricas el resultado es NA.

library(carData)
data(Chile)

sump <- function(x) {
if (is.numeric(x)) {
sum(x[x > 0], na.rm = TRUE) }
else {
NA
}
}

sumn <- function(x) {
if (is.numeric(x)) {
sum(x[x < 0], na.rm = TRUE)
} else {
NA
}
}

sapply(Chile, FUN = sump)

sapply(Chile, FUN = sumn)

> sapply(Chile, FUN = sump)
  region   population  sex  ageeducation   income 
  NA 4.11e+08   NA 1.040430e+05   NA 8.814500e+07 
   statusquo vote 
1.203598e+03   NA 
> sapply(Chile, FUN = sumn)
region populationsexage  education income  statusquo 
NA  0.000 NA  0.000 NA  0.000  -1203.598 
  vote 
NA 

Si no te importa que salga un aviso entonces las definiciones de sumn y sump se 
pueden simplificar como sigue:


sump <- function(x) {
   sum(x[x > 0], na.rm = TRUE) }
}

sumn <- function(x) {
   sum(x[x < 0], na.rm = TRUE)
}

Un saludo.

El lun, 02-01-2023 a las 11:23 +0100, Manuel Mendoza escribió:
> Gracias Emilio y Proyecto R-UCA, no consigo implementar ninguna de vuestras 
> propuestas.
> En la de Emilio sale bien hasta las funciones, incluidas, pero no entiendo a 
> partir de: d |>
> y me da error.
> 
> Respecto a sum(x[x>0]), lamento deciros que  tampoco  lo entiendo ni consigo 
> implementarlo
> 
> ¿Podríais darme más detalles?
> 
> Gracias,
> Manuel
> 
> 
> El lun, 2 ene 2023 a las 10:23, Proyecto R-UCA () escribió:
> > Buenas,
> > 
> > Sin usar dplyr,
> > 
> > Se puede hacer un bucle en las columnas y para cada columna
> > 
> > sum(x[x>0])
> > 
> > sum(x[x < 0])
> > 
> > Un saludo.
> > 
> > El lun, 02-01-2023 a las 09:02 +0100, Emilio L. Cano escribió:
> > > Hola,
> > > 
> > > Este sería un ejemplo reproducible rápido. A mí para esto me gusta 
> > > rowise() de {dplyr}. En c_across() se pueden seleccionar las
> > > columnas a
> > > conveniencia. Seguramente haya una forma de evitar crear las funciones. 
> > > Si la suma la quieres en valor absoluto multiplicas por -1 en
> > > suma_neg y listo.
> > > 
> > > Un saludo,
> > > Emilio
> > > 
> > > 
> > > > set.seed(2023)
> > > > d <- data.frame(a = round(rnorm(10), 1),
> > > + b = round(rnorm(10), 1),
> > > + c = round(rnorm(10), 1))
> > > > d
> > >   a    b    c
> > > 1  -0.1  0.3 -0.4
> > > 2  -1.0 -0.4 -0.3
> > > 3  -1.9  0.6  1.2
> > > 4  -0.2  0.7  0.2
> > > 5  -0.6 -0.6 -0.4
> > > 6   1.1  0.7 -1.8
> > > 7  -0.9  0.6 -0.6
> > > 8   1.0  0.5 -0.9
> > > 9  -0.4  0.9  1.5
> > > 10 -0.5  0.6  2.7
> > > > 
> > > > library(dplyr)
> > > > 
> > > > suma_pos <- function(x){
> > > +   sum((x>0)*x)
> > > + }
> > > > suma_neg <- function(x){
> > > +   sum((x<0)*x)
> > > + }
> > > > 
> > > > d |> 
> > > +   rowwise() |> 
> > > +   mutate(positivos = suma_pos(c_across()),
> > > +  negativos = suma_neg(c_across()))
> > > # A tibble: 10 × 5
> > > # Rowwise: 
> > >    a b c positivos negativos
> > >        
> > >  1  -0.1   0.3  -0.4   0.3  -0.5
> > >  2  -1    -0.4  -0.3   0    -1.7
> > >  3  -1.9   0.6   1.2   1.8  -1.9
> > >  4  -0.2   0.7   0.2   0.9  -0.2
> > >  5  -0.6  -0.6  -0.4   0    -1.6
> > >  6   1.1   0.7  -1.8   1.8  -1.8
> > >  7  -0.9   0.6  -0.6   0.6  -1.5
> > >  8   1 0.5  -0.9   1.5  -0.9
> > >  9  -0.4   0.9   1.5   2.4  -0.4
> > > 10  -0.5   0.6   2.7   3.3  -0.5
> > > 
> > > 
> > > 
> > > > El 2 ene 2023, a las 6:31, Manuel Mendoza  
> > > > escribió:
> > > > 
> > > > Buenos días, de un conjunto de variables, quiero obtener la suma de los
> > > > valores positivos de cada fila, por una parte, y la de los negativos por
> > > > otra. Qué variables toman valores positivos y negativos varía de una 
> > > > fila a
> > > > otra, claro.
> > > > Gracias por vuestra ayuda,
>

Re: [R-es] Sumar positivos y negativos por separado

2023-01-02 Por tema Proyecto R-UCA

Buenas,

Sin usar dplyr,

Se puede hacer un bucle en las columnas y para cada columna

sum(x[x>0])

sum(x[x < 0])

Un saludo.

El lun, 02-01-2023 a las 09:02 +0100, Emilio L. Cano escribió:
> Hola,
> 
> Este sería un ejemplo reproducible rápido. A mí para esto me gusta rowise() 
> de {dplyr}. En c_across() se pueden seleccionar las columnas a
> conveniencia. Seguramente haya una forma de evitar crear las funciones. Si la 
> suma la quieres en valor absoluto multiplicas por -1 en
> suma_neg y listo.
> 
> Un saludo,
> Emilio
> 
> 
> > set.seed(2023)
> > d <- data.frame(a = round(rnorm(10), 1),
> + b = round(rnorm(10), 1),
> + c = round(rnorm(10), 1))
> > d
>   a    b    c
> 1  -0.1  0.3 -0.4
> 2  -1.0 -0.4 -0.3
> 3  -1.9  0.6  1.2
> 4  -0.2  0.7  0.2
> 5  -0.6 -0.6 -0.4
> 6   1.1  0.7 -1.8
> 7  -0.9  0.6 -0.6
> 8   1.0  0.5 -0.9
> 9  -0.4  0.9  1.5
> 10 -0.5  0.6  2.7
> > 
> > library(dplyr)
> > 
> > suma_pos <- function(x){
> +   sum((x>0)*x)
> + }
> > suma_neg <- function(x){
> +   sum((x<0)*x)
> + }
> > 
> > d |> 
> +   rowwise() |> 
> +   mutate(positivos = suma_pos(c_across()),
> +  negativos = suma_neg(c_across()))
> # A tibble: 10 × 5
> # Rowwise: 
>    a b c positivos negativos
>        
>  1  -0.1   0.3  -0.4   0.3  -0.5
>  2  -1    -0.4  -0.3   0    -1.7
>  3  -1.9   0.6   1.2   1.8  -1.9
>  4  -0.2   0.7   0.2   0.9  -0.2
>  5  -0.6  -0.6  -0.4   0    -1.6
>  6   1.1   0.7  -1.8   1.8  -1.8
>  7  -0.9   0.6  -0.6   0.6  -1.5
>  8   1 0.5  -0.9   1.5  -0.9
>  9  -0.4   0.9   1.5   2.4  -0.4
> 10  -0.5   0.6   2.7   3.3  -0.5
> 
> 
> 
> > El 2 ene 2023, a las 6:31, Manuel Mendoza  
> > escribió:
> > 
> > Buenos días, de un conjunto de variables, quiero obtener la suma de los
> > valores positivos de cada fila, por una parte, y la de los negativos por
> > otra. Qué variables toman valores positivos y negativos varía de una fila a
> > otra, claro.
> > Gracias por vuestra ayuda,
> > Manuel
> > 
> > [[alternative HTML version deleted]]
> > 
> > ___
> > R-help-es mailing list
> > R-help-es@r-project.org
> > https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!XPbjkJgKEEP5dmap64bNfzfAmIe4ArK_nN4H9-QIBPAihE4aO-RS6q6YAaM3IT-sP9qA0PqeGoqQF7gIlec$
> >  
> 
> 
> [[alternative HTML version deleted]]
> 
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!XPbjkJgKEEP5dmap64bNfzfAmIe4ArK_nN4H9-QIBPAihE4aO-RS6q6YAaM3IT-sP9qA0PqeGoqQF7gIlec$
>  
___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Re: [R-es] Problemas libreria dplyr -pide libreria cli y lifecycle pero no me deja descargaralas

2022-11-09 Por tema Proyecto R-UCA

Buenas, María:

No necesitas privilegios de administrador para instalar R ni ningún paquete. 
Únicamente tendrás que instalarlo en una carpeta donde puedas
escribir y asegurarte que arrancas esa versión de R y no cualquier otra que 
pueda estar instalada en el equipo.

Antes de empezar borra todo lo que puedas para que no haya problemas con 
versiones instaladas en diferentes momentos.

Si no estoy equivocado, el propio instalador puede crear la carpeta.

Se supone que los mirrors, son todos iguales, de lo contrario no serían 
mirrors. Yo siempre uso el primero que sale.

Un saludo.

El mar, 08-11-2022 a las 19:00 +0100, ligelai...@gmail.com escribió:
> Buenas tardes,
> Gracias por la rápida respuesta
> 
> No tengo permisos de administrador,por motivos de seguridad.
> Lo que había pensado es :
> 1. Desinstalar R ,borrar todas las librerías y reinstalarlo (la versión a la 
> que tengo acceso 3.6.1) en la ruta en la que estabaC\..
> En caso de crear un directorio fuera de mi usuario,me surgen muchas preguntas:
> 2. Creo una carpeta en C o directamente hago la instalación? Y para acceder a 
> el seria igual que antes? Puesto que ahora accedo desde
> programas.
> 3. Cuando pueda instalarle,instalaré las librerías,empezare por Rtools,tal 
> como me comentas en el mail anterior,pero ¿debo usar algun
> “mirror” en concreto o puedo usar cualquiera?
> Un saludo,
> Maria
> 
> 
> > El 8 nov 2022, a las 11:11, Carlos Ortega  
> > escribió:
> > 
> > 
> > Hola,
> > 
> > ¿No puedes escribir nada en "C:\"?.
> > Si te puedes llegar a crear un directorio en tu ordenador, fuera de tu 
> > usuario. En ese directorio, puedes ponerte todo sin problemas:
> > RTools, RStudio, R y las librerías. Hace poco tuve que pasar por un proceso 
> > parecido, por falta de permisos para instalarlo dentro de mi
> > usuario y de esta forma lo pude instalar todo.
> > Si no puedes llegar a crear un directorio propio, veo complicado el que 
> > puedas usar esas librerías que te hacen falta.
> > Si no es un conjunto de datos muy grande, ¿puedes ponerlos en 
> > RStudio_Cloud?. En la opción gratuita, puedes hacer todo esto sin
> > problemas.
> > Y no, no conozco ningún curso para aprender a configurar R...
> > 
> > La duplicidad de las librerías, como te han comentado cuando te instalas 
> > alguna librería que necesita compilación, en este proceso se
> > usan propiedades de tu máquina (versión de R, versión de SO, etc). Por otro 
> > lado, cada vez que hay un cambio de versión "major", se crea
> > un directorio nuevo para las librerías y por eso las tienes que actualizar 
> > todas.
> > 
> > Saludos,
> > Carlos Ortega
> > https://urldefense.com/v3/__http://www.qualityexcellence.es__;!!D9dNQwwGXtA!RMfZZ91btaxToAtiDsQDE42EgYydDtoMJCHH0fsrrERVhh40dKjpfesRzshWJmI_nI4X1nAGXNpcA2ty$
> >  
> > 
> > 
> > > El mar, 8 nov 2022 a las 8:29,  escribió:
> > > Buenos días Carlos,
> > > Por motivos corporativos no piedo instalar otra version diferente a la 
> > > 3.6.1.
> > > 
> > > Intente instalar RTools y tanpoco me lo permitió.
> > > 
> > > Lo único que se me ocurre es desinstalar e instalar de nuevo. Al 
> > > desinstalar R ,limpia todas las librerías descargadas?
> > > Tambien,me surge la duda,al instalarse en mi caso y el de mi compañera 
> > > las lobrerias las tenemos en documentos como en
> > > C:\windows\archivos de programa\R
> > > 
> > > ¿Por que la duplicidad de las librerías?
> > > ¿Por favor,me podrias indicar si hay algun libro o curso donde aprender a 
> > > configurar R?
> > > 
> > > 
> > > Muchas gracias,
> > > Maria
> > > > El 7 nov 2022, a las 22:54, Carlos Ortega  
> > > > escribió:
> > > > 
> > > > procede
> > 
> > 
> > -- 
> > Saludos,
> > Carlos Ortega
> > https://urldefense.com/v3/__http://www.qualityexcellence.es__;!!D9dNQwwGXtA!RMfZZ91btaxToAtiDsQDE42EgYydDtoMJCHH0fsrrERVhh40dKjpfesRzshWJmI_nI4X1nAGXNpcA2ty$
> >  
> 
> [[alternative HTML version deleted]]
> 
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!RMfZZ91btaxToAtiDsQDE42EgYydDtoMJCHH0fsrrERVhh40dKjpfesRzshWJmI_nI4X1nAGXOMWoAle$
>  

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

Re: [R-es] Problemas libreria dplyr -pide libreria cli y lifecycle pero no me deja descargaralas

2022-11-08 Por tema Proyecto R-UCA

Buenas, María:

Casi todos los paquetes de R necesitan ser compilados para adaptarse a la 
configuración del ordenador.

Tanto dplyr como lyfecycle la versión que necesitan de R es la 3.4, por lo que 
no deberías tener problemas en lo relativo a la versión de R.

La captura de pantalla tiene tan poca resolución que yo no consigo verla. 
Sugiero que ejecutes en R en el ordenador en cuestión la
instrucción 

update.packages(ask="no")

Ten paciencia, esto puede tardar mucho mucho tiempo. Si te dice que hay algún 
paquete que ha dado error intenta instalar ese paquete con la
instrucción

install.packages("nombrepaquete")

Copia el texto que te salga y envíalo.

Un saludo.

El mar, 08-11-2022 a las 08:29 +0100, ligelai...@gmail.com escribió:
> Buenos días Carlos,
> Por motivos corporativos no piedo instalar otra version diferente a la 3.6.1.
> 
> Intente instalar RTools y tanpoco me lo permitió.
> 
> Lo único que se me ocurre es desinstalar e instalar de nuevo. Al desinstalar 
> R ,limpia todas las librerías descargadas?
> Tambien,me surge la duda,al instalarse en mi caso y el de mi compañera las 
> lobrerias las tenemos en documentos como en C:\windows\archivos
> de programa\R
> 
> ¿Por que la duplicidad de las librerías?
> ¿Por favor,me podrias indicar si hay algun libro o curso donde aprender a 
> configurar R?
> 
> 
> Muchas gracias,
> Maria
> > El 7 nov 2022, a las 22:54, Carlos Ortega  
> > escribió:
> > 
> > procede
> 
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://urldefense.com/v3/__https://stat.ethz.ch/mailman/listinfo/r-help-es__;!!D9dNQwwGXtA!WNWdMHnzYq4IS-69EK3fTBYTfKEvdLzXnLiZPUhEQS7D8fBkVP23Tf-yCV2wD5sMuOdnl2BBA7otKwnl$
>  

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

Re: [R-es] Menu R Gui -Archivo -> interpretar codigo fuente

2022-10-20 Por tema Proyecto R-UCA

Buenas,

Una opción es copiar el icono del lanzador de R al escritorio pulsando para 
ello el botón derecho del ratón y seleccionando la opción
correspondiente.

Una vez en el escritorio, vuelve a pulsar el botón derecho del ratón encima del 
icono y selecciona propiedades.

Te aparecerá un cuadro que pone "Iniciar en" pon en ese cuadro la ruta completa 
de donde quieres leer los archivos.

A partir de ahora usa ese icono para iniciar R.

Si quieres usar varias carpetas puedes poner varios iconos con varios 
directorios de inicio.

Ten en cuenta que, como ya se ha dicho, esto hace que si usas más de un fichero 
en carpetas distintas, tu código no sea portable.

Un saludo.
-- 
--
http://knuth.uca.es/R
--
Proyecto R-UCA
--
Nombre: Manuel Muñoz Márquez
Departamento: Departamento de Estadística e Investigación Operativa
Institución: Escuela Superior de Ingeniería
Organización: Universidad de Cádiz
--


El mié, 19-10-2022 a las 21:18 +0200, ligelai...@gmail.com escribió:
> 
> > 
> > Buenas tardes,
> > Me gustaria saber como dejar por defecto una ruta en el menu (adjunto) 
> > :archivo->interpretar codigo fuente
> > 
> > Al seleccionar esa opcion, me manda directamete a una ruta,pero quiero que 
> > al abrirlo se abra una carpeta determinada.
> > He probado cambiando el directorio de trabajo con setwd (ruta) pero no lo 
> > cambia.
> > En el adjunto esta el menu al que me refiero,la ruta que me sale por 
> > defecto y luego la que quiero que se me abra al seleccionar
> > “interpretar codigo fuente”
> > en vez de ir a :este equipo documentos,me gustaria que fuese a : D:\\nueva 
> > carpeta
> > 
> > 
> > ¿Alguien sabria como hacerlo? O si hay algun sitio donde se expliquen 
> > dichos menus?
> > Gracias por adelantado,
> > Un saludo
> > 
> ___
> 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] Github y software libre

2022-06-14 Por tema Proyecto R-UCA


Buenas,

Algunos de nosotros hemos tenido la oportunidad de encontrarnos en 
persona recientemente en Granada.


Me consta que muchos de nosotros somos defensores del software libre. 
Todos los presentes parecían usar Github, al parecer yo era la única 
excepción y nadie dijo lo contrario.


Casualmente me he encontrado con una entrevista a Richard Stallman en la 
que habla de Github. Una de las cuestiones que recalca es que el hecho 
de publicar software, en Github o cualquier otro sitio, no lo hace 
libre, para eso hace falta que se publique con la licencia apropiada.


Os recomiendo la lectura de la entrevista:

https://unaaldia.hispasec.com/2022/06/chema-alonso-entrevista-a-richard-stallman-parte-i.html

Un saludo

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

Re: [R-es] Eliminar registros por un criterio.

2022-05-17 Por tema Proyecto R-UCA

Buenas, 

Una idea de como lo haría yo.

Un saludo.

> d <- data.frame(clientes=c('a', 'a', 'b', 'c'), importe=c(NA, 3, 3,
NA))
> d
  clientes importe
1a  NA
2a   3
3b   3
4c  NA
> dd <- d[d$clientes %in% d$clientes[duplicated(d$clientes)],]
> dd <- na.omit(dd)
> dnd <- d[!(d$clientes %in% d$clientes[duplicated(d$clientes)]),]
> dnd
  clientes importe
3b   3
4c  NA
> ddd <- rbind(dd, dnd)
> ddd
  clientes importe
2a   3
3b   3
4c  NA
-- 
--
http://knuth.uca.es/R
------
Proyecto R-UCA
--
Nombre: Manuel Muñoz Márquez
Departamento: Departamento de Estadística e Investigación Operativa
Institución: Escuela Superior de Ingeniería
Organización: Universidad de Cádiz

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

Re: [R-es] reemplazar valores de una variable por otras

2021-11-19 Por tema Proyecto R-UCA

Buenas,

¿qué tal esto?

Supongamos que las variables están en un data.frame d que tiene todas
esas columnas, entonces

d$Direccion_Final <- d$Direccion
d$Direccion_Final[is.na(d$Direccion_Final)] <- d$Direccion_General
d$Direccion_Final[is.na(d$Direccion_Final)] <- d$Subsecretaria
d$Direccion_Final[is.na(d$Direccion_Final)] <- d$Secretaria

Un saludo.

P.D.: Quito las tildes de los nombres de las variables pues pueden dar
problemas de portabilidad.

El jue, 18-11-2021 a las 15:35 -0300, juan manuel dias escribió:
> Hola, como andan!
> Necesito crear una variable nueva "Dirección_Final" que sea igual a
> la variable "Dirección", pero que si "Dirección" es NA traiga
> "Dirección General", si "Dirección General" es NA traiga
> "Subsecretaria", y si "Subsecretaria" es NA traiga "Secretaria".
> Estoy intentando con ifesle pero no logro llegar al resultado
> esperado! Les dejo un recorte de la base! Muchas gracias!
> Saludos, Juan.
> ___
> 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] Pasar nombre variable regresión

2021-11-18 Por tema Proyecto R-UCA

Buenas,

No he profundizado en el motivo pero como dices falla si las variables
no están en el data.frame. Tienes que agregarlas primero al data.frame.

Si el espacio del que hablas es el padre, o algún ascendiente, no
habría problemas, pues R cuando no existe una variable en un entorno
mira en los padres.

En caso contrario, lo que puedes hacer es asignar la variable
globalmente en dicho entorno, por ejemplo
dd <<- data.frame(weight = weight, group = group, ctl = ctl, trt=trt)
crearía un data.frame dd accesible desde cualquier parte.

Esto de crear variables globales debe ser un último recurso pues puede
generar problemas. Te recomiendo intentes pasar el data.frame como
argumento a la función que va a hacer las regresiones.

Un saludo.

El jue, 18-11-2021 a las 13:34 +0100, Griera-yandex escribió:
> Gracias por la respuesta!
> 
> El código tuyo funciona sin problema, pero cuando lo "adapto" me da
> error:
> 
> > ctl <- c(4.17,5.58,5.18,6.11,4.50,4.61,5.17,4.53,5.33,5.14)
> + trt <- c(4.81,4.17,4.41,3.59,5.87,3.83,6.03,4.89,4.32,4.69)
> + group <- gl(2, 10, 20, labels = c("Ctl","Trt"))
> + weight <- c(ctl, trt)
> + df <- data.frame (weight = weight, group = group)
> + rm(ctl, trt, group, weight)   ## Ya que la regresión se
> ejecutaria, por ejemplo, dentro de otro espacio y estos objetos no
> estarian accesibles
> + model <- "df$weight ~ df$group"
> + summary (lm(model))
> Error in df$weight : object of type 'closure' is not subsettable
> 
> Que estoy haciendo mal?
> 
> Muchas gracias y saludos!
> 
> 
> On Thu, 18 Nov 2021 13:12:43 +0100
> Proyecto R-UCA  wrote:
> 
> > Buenas,
> > 
> > a ver si esto te sirve:
> > ctl <- c(4.17,5.58,5.18,6.11,4.50,4.61,5.17,4.53,5.33,5.14)
> > trt <- c(4.81,4.17,4.41,3.59,5.87,3.83,6.03,4.89,4.32,4.69)
> > group <- gl(2, 10, 20, labels = c("Ctl","Trt"))
> > weight <- c(ctl, trt)
> > dd <- data.frame(weight = weight, group = group, ctl = ctl,
> > trt=trt)
> > model <- "dd$weight ~ dd$group"
> > summary(lm(model))
> > 
> > Únicamente tendrías que construir previamente la fórmula con paste.
> > 
> > La salida es:
> > Call:
> > lm(formula = model)
> > 
> > Residuals:
> >     Min  1Q  Median  3Q Max 
> > -1.0710 -0.4938  0.0685  0.2462  1.3690 
> > 
> > Coefficients:
> >     Estimate Std. Error t value Pr(>|t|)    
> > (Intercept)   5.0320 0.2202  22.850 9.55e-15 ***
> > dd$groupTrt  -0.3710 0.3114  -1.191    0.249    
> > ---
> > Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1
> > 
> > Residual standard error: 0.6964 on 18 degrees of freedom
> > Multiple R-squared:  0.07308,   Adjusted R-squared:  0.02158 
> > F-statistic: 1.419 on 1 and 18 DF,  p-value: 0.249
> > 
> > Un saludo.
> > 
> > El jue, 18-11-2021 a las 12:03 +0100, Griera escribió:
> > > Hola, buenos días:
> > > 
> > > No es un problema concreto que tenga ahora, pero es un problema
> > > general
> > > que no se si tiene solución fácil. Hago una regresión (de
> > > lm.html):
> > > 
> > > ctl <- c(4.17,5.58,5.18,6.11,4.50,4.61,5.17,4.53,5.33,5.14)
> > > trt <- c(4.81,4.17,4.41,3.59,5.87,3.83,6.03,4.89,4.32,4.69)
> > > group <- gl(2, 10, 20, labels = c("Ctl","Trt"))
> > > weight <- c(ctl, trt)
> > > lm.D9 <- lm(weight ~ group)
> > > 
> > > Si quiero que la variable independiente sea una "variable", y
> > > hago:
> > > 
> > > X = "group"
> > > lm.D9 <- lm(weight ~ X)
> > > 
> > > Y da el error: Error in model.frame.default(formula = XVD ~
> > > group,
> > > drop.unused.levels = TRUE) : 
> > >   variable lengths differ (found for 'group')
> > > 
> > > Ya que, como me decían el otro día "estás asignando a la variable
> > > X el
> > > valor "X" y no el
> > > contenido de la variable X."
> > > 
> > > ¿No hay forma de que entienda que "X" es el nombre de la variable
> > > independiente "group", que no sea pasar la posición de la
> > > variable?
> > > 
> > > Muchas gracias y saludos a todos.
> > > 
> > > ___
> > > 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-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Re: [R-es] Pasar nombre variable regresión

2021-11-18 Por tema Proyecto R-UCA

Buenas,

a ver si esto te sirve:
ctl <- c(4.17,5.58,5.18,6.11,4.50,4.61,5.17,4.53,5.33,5.14)
trt <- c(4.81,4.17,4.41,3.59,5.87,3.83,6.03,4.89,4.32,4.69)
group <- gl(2, 10, 20, labels = c("Ctl","Trt"))
weight <- c(ctl, trt)
dd <- data.frame(weight = weight, group = group, ctl = ctl, trt=trt)
model <- "dd$weight ~ dd$group"
summary(lm(model))

Únicamente tendrías que construir previamente la fórmula con paste.

La salida es:
Call:
lm(formula = model)

Residuals:
Min  1Q  Median  3Q Max 
-1.0710 -0.4938  0.0685  0.2462  1.3690 

Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept)   5.0320 0.2202  22.850 9.55e-15 ***
dd$groupTrt  -0.3710 0.3114  -1.1910.249
---
Signif. codes:  0 ‘***’ 0.001 ‘**’ 0.01 ‘*’ 0.05 ‘.’ 0.1 ‘ ’ 1

Residual standard error: 0.6964 on 18 degrees of freedom
Multiple R-squared:  0.07308,   Adjusted R-squared:  0.02158 
F-statistic: 1.419 on 1 and 18 DF,  p-value: 0.249

Un saludo.

El jue, 18-11-2021 a las 12:03 +0100, Griera escribió:
> Hola, buenos días:
> 
> No es un problema concreto que tenga ahora, pero es un problema general
> que no se si tiene solución fácil. Hago una regresión (de lm.html):
> 
> ctl <- c(4.17,5.58,5.18,6.11,4.50,4.61,5.17,4.53,5.33,5.14)
> trt <- c(4.81,4.17,4.41,3.59,5.87,3.83,6.03,4.89,4.32,4.69)
> group <- gl(2, 10, 20, labels = c("Ctl","Trt"))
> weight <- c(ctl, trt)
> lm.D9 <- lm(weight ~ group)
> 
> Si quiero que la variable independiente sea una "variable", y hago:
> 
> X = "group"
> lm.D9 <- lm(weight ~ X)
> 
> Y da el error: Error in model.frame.default(formula = XVD ~ group,
> drop.unused.levels = TRUE) : 
>   variable lengths differ (found for 'group')
> 
> Ya que, como me decían el otro día "estás asignando a la variable X el
> valor "X" y no el
> contenido de la variable X."
> 
> ¿No hay forma de que entienda que "X" es el nombre de la variable
> independiente "group", que no sea pasar la posición de la variable?
> 
> Muchas gracias y saludos a todos.
> 
> ___
> 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] Bucle de regresiones

2021-11-15 Por tema Proyecto R-UCA

Buenas,

En el bucle estás asignando a la variable X el valor "X1" y no el
contenido de la variable X.

A ver si esto te sirve:

for (Y in 1:2)
{
for (X in 3:4)
{
cat ("Y:", names(df)[Y], "X:", names(df)[X], "\n")
print (summary (lm (df[,Y] ~ df[,X] + SE + ED,
data <- df)))
}
}

Un saludo.

El lun, 15-11-2021 a las 13:20 +0100, Griera-yandex escribió:
> Hola, buenos dias:
> 
> Estoy intentando hacer una serie de regresiones en las que la "y" y una
> de las "x", son diferentes en cada regresión. Además, hay unos
> predictores constantes. Un ejemplo seria de los datos seria:
> 
> N <- 100
> 
> # x1, y1
> set.seed(1234)
> x1 <- sample(1:100, N, replace <- TRUE)
> mean(x1);sd(x1)
> y1 <- x1 + 2 + 1.5*rnorm(length(x1))
> 
> # x2, y2
> set.seed(5678)
> x2 <- 1:N
> x2 <- sample(1:100, N, replace <- TRUE)
> mean(x2);sd(x2)
> y2 <- x2 + 2 + 1.5*rnorm(length(x2))
> 
> df <- data.frame (Y1 <- y1
> , Y2 <- y2
> , X1 <- x1
> , X2 <- x2
> , SE <- factor(rbinom(N, 1, .5))
> , ED <- sample(20:50, N, replace <- TRUE)
> )
> 
> Intento hacer dos bucles para cambiar la "y" y las "x":
> 
> YL <- c ("Y1", "Y2")
> XL <- c ("X1", "X2")
> for (Y in YL)
> {
> for (X in XL)
> {
> cat ("Y:", Y, "X:", X, "\n")
> print (summary (lm (Y ~ X + SE + ED,
> data <- df)))
> }
> }
> 
> Pero al ejecutarlo, da el error:
> 
> Error in model.frame.default(formula = Y ~ X + SE + ED, data = df,
> drop.unused.levels = TRUE) : 
>   variable lengths differ (found for 'SE')
> 
> Parece como si no entendiera que la Y es "Y1" y la X es "X1" de df. 
> 
> ¿Alguna ayuda de como se puedes solucionas?
> 
> Muchas gracias a todos!
> 
>  
> 
> ___
> 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] Eliminar todos los caracteres después de un espacio en blanco

2021-10-12 Por tema Proyecto R-UCA

Buenas, Juan:

A ver si esto te sirve:
a <- c("7/6/2020 7:55:38 p.m.", "7/3/2020 1:08:36 p.m.", "7/3/2020
6:08:35 p.m.")
f <- function(x) {
strsplit(x, " ")[[1]][1]
}
unlist(lapply(a, f))

[1] "7/6/2020" "7/3/2020" "7/3/2020"

Un saludo

El mar, 12-10-2021 a las 13:19 -0300, juan manuel dias escribió:
> Hola José, como andas!
> 
> Por alguna razón me trae algún problema hacerlo de ese modolo que
> venía
> haciendo es dejar las cadenas en
> 
> 7/6/2020
> 7/3/2020
> 
> Y luego con lubridate resolvía de este modo...
> 
> movimientos.exp$`Fecha de caratulación`<-
> lubridate::mdy(movimientos.exp$`Fecha de caratulación`)
> 
> Por eso necesito primero limpiar la cadena...sacando todo lo que
> sigue al
> espacio.
> 
> Muchas gracias!
> 
> El mar, 12 oct 2021 a las 12:44, jose luis ()
> escribió:
> 
> > ¿asi te valdria?
> > 
> > datos$FECHA <- as.Date(datos$FECHA, format = "%d/%m/%Y")
> > 
> > En martes, 12 de octubre de 2021 17:28:28 CEST, juan manuel dias <
> > juamad...@gmail.com> escribió:
> > 
> > 
> > Hola, como andan!
> > Tengo una variable con fechas que están en formato cadena y se me
> > complica
> > para trabajarlas directamente con lubridate, antes tengo que
> > hacerle unos
> > retoques y necesitaría eliminar todo lo que aparece después del
> > espacio en
> > blancoes decir eliminar horas minutos segundos y p.m. am.
> > Se les ocurre como hacer?
> > Muchas gracias! Juan.
> > 
> > 7/6/2020 7:55:38 p.m.
> > 7/3/2020 1:08:36 p.m.
> > 7/3/2020 6:08:35 p.m.
> > 6/1/2020 1:15:19 p.m.
> > 7/8/2020 7:18:26 p.m.
> > 8/6/2020 5:59:32 p.m.
> > 9/1/2020 5:40:57 p.m.
> > 
> >     [[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-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Re: [R-es] Reemplazar NA's

2021-09-28 Por tema Proyecto R-UCA

Buenas

Si el data.frame, o cualquier otro objeto con dos dimensiones es d, 
d$Localidad[is.na(d$Localidad)] <- d$Provincia[is.na(d$Localidad]]

O bien en dos pasos:
index <- is.na(d$Localidad)
d$Localidad[index] <- d$Provinica[index]

Un saludo


-- 
--
http://knuth.uca.es/R
--
Proyecto R-UCA
--
Nombre: Manuel Muñoz Márquez
Departamento: Departamento de Estadística e Investigación Operativa
Institución: Escuela Superior de Ingeniería
Organización: Universidad de Cádiz
--


El mar, 28-09-2021 a las 11:29 +0200, XYGcom escribió:
> Buenos días. Una pregunta que supongo sencilla pero a la que no le
> encuentro solución: ¿como reemplazo los valores NA por el que figura en
> otra columna?
> 
> Supongamos que tengo:
> Localidad. Provincia
> Argamasilla   Ciudad Real
> NA Cuenca
> NA Albacete
> 
> Quisiera sustituir el primer NA por Cuenca, el segundo por Albacete y
> así en todo el dataframe.
> 
> Gracias anticipadas a todos.
> 
> Jesús López
> ___
> 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] Exportar a wmf desde linux

2021-09-19 Por tema Proyecto R-UCA

Buenas,

Yo tampoco uso Microsoft windows, pero en alguna ocasión he tenido que
usar la versión de R para windows. En ese caso lo que he hecho es
instalar R para windows usando wine.

Si te resulta más sencillo puedes usar playonlinux, que es una interfaz
muy amigable para wine.

Un saludo.
-- 
--
http://knuth.uca.es/R
--
Proyecto R-UCA
--
Nombre: Manuel Muñoz Márquez
Departamento: Departamento de Estadística e Investigación Operativa
Institución: Escuela Superior de Ingeniería
Organización: Universidad de Cádiz
--

El dom, 19-09-2021 a las 13:15 +0200, José Trujillo Carmona escribió:
> Hola compañeros.
> 
> Me veo en la necesidad de reemplazar temporalmente a un compañero.
> Enseña R con windows, mientras que todos mis equipos están en linux.
> Me 
> sería complejo pasar a windows para una asignatura y por solo un par
> de 
> meses y no creo que sea necesario.
> 
> El caso es que en los protocolos de prácticas mi compañero guarda los
> gráficos en wmf utilizando el botón derecho sobre la ventana gráfica.
> Este recurso no está disponible en linux.
> 
> Puedo guardar en pdf, svg o xfig mediante la función dev.print sin
> problema y después cambiarlos mediante LibreOffice o Inkscape, pero
> se 
> hace todo un poco pesado (será mi opción "B"). Pero ¿hay opción "A"?
> 
> ¿Sabéis si hay algún comando linux que exporte a wmf como savePlot en
> Windows?
> 
> La versión de linux solo exporta a bitmaps en forma "png", "jpeg",
> "tiff", "bmp"
> 
> Googleando he encontrado que la función ggsave de ggplot2 es posible
> que 
> lo haga, ... pero: "(windows only)"
> 
> Gracias de antemano.
> 
> ___
> 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] Cambiar la versión de R en R-Studio

2021-09-10 Por tema Proyecto R-UCA

Buenas:

En linux, otra opción sería añadir al fichero .bash de la carpeta de
usuario las siguientes líneas

alias rstudio1 = 'PATH=$HOME/R1/bin:$HOME/bin:$PATH; rstudio'
alias rstudio2 = 'PATH=$HOME/R2/bin:$HOME/bin:$PATH; rstudio'

Suponiendo que las dos instalaciones de R están en $HOME/R1 y $HOME/R2,
las instrucciones rstudio1 o rstudio2 arrancan R con la versión
correspondiente de R.

No he probado esto con rstudio, pues no lo uso, pero una configuración
similar me permite usar la versión de R instalada en el sistema o la
versión de R instalada en el directorio de usuario. El truco está en el
orden de búsqueda de R en los directorios.

Un saludo.

-- 
--
http://knuth.uca.es/R
--
Proyecto R-UCA
--
Nombre: Manuel Muñoz Márquez
Departamento: Departamento de Estadística e Investigación Operativa
Institución: Escuela Superior de Ingeniería
Organización: Universidad de Cádiz

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

Re: [R-es] Cargar data frame en app shiny

2020-11-27 Por tema Proyecto R-UCA

Hola:

¿Has comprobado los permisos de las carpetas padre?

Ten en cuenta que shiny tal vez se esté ejecutando por algún usuario de
sistema con privilegios restringidos como www-data o similar.

Un saludo.

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

Re: [R-es] pedido de ayuda

2020-09-21 Por tema Proyecto R-UCA

Buenas Emilio, Ana y erreros:

Llevo mucho tiempo sin recibir los mensajes de esta cuenta debido a un
problema con mi cliente de correo.

Mucha gracias Emilio por recomendar nuestro paquete y nuestro material.

Con respecto a la recomendación que te hiciero de R-Studio, por probar
no pasa nada. Pero a mí rara vez me resulta útil R-Studio, o bien
utilizo R-Commander o utilizo cosas más frikis como emacs + ess.
R-Studio no me gusta nada pues me llena la pantalla de cosas que no
necesito. Pero por supuesto, esto es una cuestión de gustos y lo
importante es que hay donde elegir.

Bueno, con respecto a tu pregunta. Normalmente, salvo que haya habido
un problema en la instalación, cuando se instala R-Commander se
instalan todos los paquetes de los que depende. Con lo que no suele ser
necesario instalar nada más.

Lo que ocurre es que aquí cuando una opción está sombreada es que no es
aplicable, no es que no esté disponible. Por ejemplo, si nuestro
conjunto de datos activos no tiene variables de tipo factor, no está
disponible la opción de gráfico de barras, pues para hacer un diagrama
de barras se necesita una variable de tipo factor. Por el contrario, si
no tenemos datos numéricos no podremos calcular una correlación.

Las opciones se van activando y desactivando según lo que vas haciendo
o los datos que vas cargando.

Si tienes problemas con alguna opción concreta no dudes en volver a
escribir.

Un saludo.

El dom, 12-07-2020 a las 17:28 +0200, Emilio L. Cano escribió:
> Estimada Ana,
> 
> Su mensaje es demasiado general para que podamos ayudarle en la lista
> (al menos yo no me veo capaz de darle una respuesta). Yo no uso R
> Commander pero intento darle algunas pistas.
> 
> Le recomiendo en español el material de la Universidad de Cádiz.
> Tienen un paquete que al parecer lo instala todo:
> 
> http://knuth.uca.es/R/doku.php?id=instalacion_de_r_y_rcmdr:r-uca <
> http://knuth.uca.es/R/doku.php?id=instalacion_de_r_y_rcmdr:r-uca>
> 
> También este libro completo, disponible para descarga:
> http://sestio.uca.es/repos/ebrcmdr/pdf/13marzo/ebrcmdr.pdf <
> http://sestio.uca.es/repos/ebrcmdr/pdf/13marzo/ebrcmdr.pdf>
> 
> En inglés puede consultar la web del autor (John Fox) dedicada a R
> Commander:
> https://socialsciences.mcmaster.ca/jfox/Misc/Rcmdr/ <
> https://socialsciences.mcmaster.ca/jfox/Misc/Rcmdr/>
> Donde encontrará un manual: 
> https://socialsciences.mcmaster.ca/jfox/Misc/Rcmdr/Getting-Started-with-the-Rcmdr.pdf
> <
> https://socialsciences.mcmaster.ca/jfox/Misc/Rcmdr/Getting-Started-with-the-Rcmdr.pdf
> >
> 
> En esta otra página puede encontrar algún recurso más:
> https://www.rcommander.com 
> 
> Si tiene preguntas concretas, seguro que alguien de la lista le podrá
> dar respuestas precisas.
> 
> 
> Un saludo,
> 
> Emilio L. Cano
> http://emilio.lcano.com
> 
> 
> 
> > El 12 jul 2020, a las 17:18, Ana Kohan Cortada <
> > anakohancort...@yahoo.com.ar> escribió:
> > 
> > Hace días escribí..creo que se perdió mi mensaje, voy de nuevo
> > con mi pedido de ayuda...
> > Buenas, soy novata en R, estoy comenzando con RCmdr y quisiera
> > saber si pudieran ayudarme dándome algunas pistas para bajar los
> > paquetes que se necesitan para activar muchas de las funciones que
> > aparecen en la pestaña de Análisis y empezar a aplicar algunos
> > análisis.
> > Yo sé que tal vez se dediquen sólo a trabajar con R (pero yo recién
> > descubro esta interfase del RCmdr y me resulta más amigable, soy
> > psicóloga y hago psicometría)
> > Desde ya, muchísimas muchas gracias desde Argentina! 
> > 
> > Dra. Ana Kohan Cortada CIIPME-CONICET
> >155 0441827
> > 
> > 
> > [[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-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

Re: [R-es] Crear bucle

2018-02-13 Por tema Proyecto R-UCA

Buenas:

Una forma sin bucles:

> data <- read.table("/tmp/a.csv", header=TRUE, sep="",
na.strings="NA", dec=".", strip.white=TRUE)
> new_zon <- as.numeric(diff(data$Subzona) < 0)
> new_zon <- c(1, new_zon)
> new_zon <- cumsum(new_zon)
> data$new_zon <- new_zon
> data
   Margen Zona Subzona Long new_zona new_zon
1   B1   191   1
2   B1   2   121   1
3   B1   3   221   1
4   B1   4   361   1
5   B1   5   361   1
6   B1   6   981   1
7   B2   1   582   2
8   B2   2   472   2
9   B2   3   542   2
10  B2   4   872   2
11  B2   5   262   2
12  B3   1   363   3
13  A3   2   353   3
14  A3   3   913   3
15  A3   4   103   3
16  A3   5   203   3
17  A3   6   363   3
18  A4   1   574   4
19  A4   2   304   4
20  A4   3   694   4
21  A4   4   324   4
22  A4   5   334   4
23  A4   6   364   4
24  A4   7   374   4

Un saludo.

El mar, 13-02-2018 a las 18:42 -0300, Andrés Hirigoyen escribió:
> Excelente Carlos, muchas gracias. Me maree con [i] en el bucle que
> hacia.
> Saludos
> 
> 
> 
> El 13 de febrero de 2018, 18:38, Carlos Ortega es>
> escribió:
> 
> > Hola,
> > 
> > Una forma puede ser la siguiente...
> > Para comparar, he creado una nueva columna "new_zona" que es la que
> > se va
> > rellenando con un bucle...
> > 
> > #---
> > > cont <- 1
> > > new_zona <- 0
> > > for(i in 1:nrow(data)) {
> > 
> > +   new_zona[i] <- cont
> > +   if(data$Subzona[i] == 1 & i > 1) {
> > + cont <- cont + 1
> > + new_zona[i] <- cont
> > +   }
> > + }
> > > 
> > > data$new_zona <- new_zona
> > > data
> > 
> >Margen Zona Subzona Long new_zona
> > 1   B1   191
> > 2   B1   2   121
> > 3   B1   3   221
> > 4   B1   4   361
> > 5   B1   5   361
> > 6   B1   6   981
> > 7   B2   1   582
> > 8   B2   2   472
> > 9   B2   3   542
> > 10  B2   4   872
> > 11  B2   5   262
> > 12  B3   1   363
> > 13  A3   2   353
> > 14  A3   3   913
> > 15  A3   4   103
> > 16  A3   5   203
> > 17  A3   6   363
> > 18  A4   1   574
> > 19  A4   2   304
> > 20  A4   3   694
> > 21  A4   4   324
> > 22  A4   5   334
> > 23  A4   6   364
> > 24  A4   7   374
> > > 
> > 
> > Saludos,
> > Carlos Ortega
> > www.qualityexcellence.es
> > 
> > 
> > 
> > El 13 de febrero de 2018, 22:32, Xavier-Andoni Tibau Alberdi <
> > xaviti...@gmail.com> escribió:
> > 
> > > Perdona,  toda la razón, no miré bien el problema antes de
> > > responder.
> > > 
> > > Seguro que hay una manera más eficiente. Pero yo lo haría con un
> > > bucle,
> > > luego usas una bariable dummy, digamos zonna_d, que incremente su
> > > valor en
> > > 1 cada vez que subzona es ==1. Entonces zona = zonna_d.
> > > 
> > > Se entiende?
> > > 
> > > Saludos,
> > > 
> > > Xavier
> > > 
> > > 2018-02-13 22:26 GMT+01:00 Andrés Hirigoyen  > > l.com>:
> > > 
> > > > Xavier el tema que no logro solucionar es pasar de subzona==1 a
> > > > subzona==2. Probé con ifelse pero me cambia los valores de toda
> > > > la
> > > 
> > > columan
> > > > cuando cambia de zona.
> > > > Gracias por responder
> > > > 
> > > > El 13 de febrero de 2018, 18:19, Xavier-Andoni Tibau Alberdi<
> > > > xaviti...@gmail.com> escribió:
> > > > 
> > > > > Creo que necesitas usar la funcion: ifelse().
> > > > > 
> > > > > Saludos!
> > > > > 
> > > > > El 13 feb. 2018 22:16, "Andrés Hirigoyen"  > > > > ail.com>
> > > > > escribió:
> > > > > 
> > > > > > Buenas tardes para tod@s
> > > > > > (de nuevo)
> > > > > > 
> > > > > > Tengo el siguiente dataframe:
> > > > > > margen<-
> > > > > > c("A","B","A","B","A","B","A","B","A","B","A","B","A
> > > > > > ","B","A","B","A","B","A","B","A","B","A","B")
> > > > > > margen<-sort(margen, decreasing=T)
> > > > > > long<-
> > > > > > c(9,12,22,36,36,98,58,47,54,87,26,36,35,91,10,20,36,57
> > > > > > ,30,69,32,33,36,37)
> > > > > > 
> > > > > > subzona<-c(1,2,3,4,5,6,1,2,3,4,5,1,2,3,4,5,6,1,2,3,4,5,6,7)
> > > > > >

Re: [R-es] Rstudio y codificación

2016-11-21 Por tema Proyecto R-UCA

 
Buenas:

Muchas gracias Antoio por tu respuesta.

Creo que no me he explicado bien.

Cuando abro los fichero con Rstudio veo correctamente las tildes, es cuando 
ejecuto la aplicación shiny en la ventana de la aplicación shiny las tildes no 
se ven bien.

Un saludo.


--

http://www.uca.es/teloydisren [ http://www.uca.es/teloydisren ]

http://knuth.uca.es/R [ http://knuth.uca.es/R ]

--

Proyecto R-UCA

--

Nombre: Manuel Muñoz Márquez

Departamento: Departamento de Estadística e Investigación Operativa

Institución: Escuela Superior de Ingeniería de Cádiz

Organización: Universidad de Cádiz

--


El día 21 nov 2016 13:34, Antonio Maurandi López <amaura...@um.es> escribió:
> 
> Mi experiencia me dice que hay que /gastar/ un tiempo en "Guardar y 
> 
> abrir ficheros",
> 
> yo les �nsito en que se abre un fichero, se guarda y se le da un nombre 
> 
> y se guarda con encoding.. y fijamos el encoding utf8 como por defecto...
> 
> Abrimos, reabrimos con encoding...
> 
> me lleva un rato y el 20% no lo pilla y hay que repetirlo mil veces, as� 
> 
> que autom�tico no es.
> 
> El 19/11/16 a las 17:15, javier.ruben.marcu...@gmail.com escribi�:
> 
>> Estimado Manuel
>> 
>> Yo me encontr� con un problema en la codificaci�n, teniendo todo en UTF-8, 
>> eran archivos de R pero Sweave, todo correcto, pero al mover el archivo de 
>> carpeta dentro de Windows, la codificaci�n se perd�a, l�gicamente con todos 
>> los errores de acentos y cuestiones relacionadas a la configuraci�n de 
>> caracteres.
>> 
>> Es algo que no supe como solucionarlo. Habr�a que probar si ese error se 
>> repite o quedo como una experiencia personal.
>> 
>> Javier Rub�n Marcuzzi
>> 
>> De: JCMld
>> 
>> Enviado: s�bado, 19 de noviembre de 2016 9:27
>> 
>> Para: 'Proyecto R-UCA'; r-help-es@r-project.org
>> 
>> Asunto: Re: [R-es] Rstudio y codificaci�n
>> 
>> Hola Manuel,
>> 
>> Creo que si, despu�s de abrir el archivo R, utilizas la opci�n "Reopen with
>> 
>> encoding" e indicas "UTF-8", ver�s bien los acentos.
>> 
>> Saludos,
>> 
>> Juan.
>> 
>> -Mensaje original-
>> 
>> De: R-help-es [mailto:r-help-es-boun...@r-project.org [ 
>> mailto:r-help-es-boun...@r-project.org ]] En nombre de Proyecto
>> 
>> R-UCA
>> 
>> Enviado el: s�bado, 19 de noviembre de 2016 9:16
>> 
>> Para: r-help-es@r-project.org
>> 
>> Asunto: [R-es] Rstudio y codificaci�n
>> 
>> Buenas:
>> 
>> Soy usuario habitual de linux pero estoy preparando una pr�ctica para los
>> 
>> alumnos y sospecho que la mayor�a usar� Microsoft Windows.
>> 
>> La cuesti�n es que tengo una aplicaci�n en shiny:
>> 
>> http://knuth.uca.es/repos/R-contribuciones/shiny/esqueleto/ [ 
>> http://knuth.uca.es/repos/R-contribuciones/shiny/esqueleto/ ]
>> 
>> con ficheros en utf8, cuando la ejecuto en Microsoft Windows 7, con la
>> 
>> �ltima versi�n de R y de R-studio, las tildes se ven mal. Pero si cambio los
>> 
>> ficheros a latin1 entonces R-studio me dice que los ficheros no est�n en
>> 
>> utf8.
>> 
>> Si ejecut�is la aplicaci�n, �en qu� versiones de Microsoft Windows veis bien
>> 
>> las tildes en la aplicaci�n?
>> 
>> �Alguien tiene alguna idea de como resolverlo?
>> 
>> Saludos y muchas gracias.
>> 
>> --
>> 
>> Manuel Mu�oz M�rquez <r-...@uca.es>
>> 
>> ___
>> 
>> R-help-es mailing list
>> 
>> R-help-es@r-project.org
>> 
>> https://stat.ethz.ch/mailman/listinfo/r-help-es [ 
>> 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 [ 
>> 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 [ 
>> https://stat.ethz.ch/mailman/listinfo/r-help-es ]
>> 
> -- 
> 
> Antonio Maurandi L�pez
> 
> Sec. Apoyo Estad�stico (SAE)
> 
> Servicio de Apoyo a la Investigaci�n (SAI)
> 
> Vicerrectorado de Investigaci�n
> 
> Universidad de Murcia
> 
> Edif. SACE. Campus de Espinardo.
> 
> 30100 Murcia
> 
> @. amaura...@um.es
> 
> T. 868 88 7315 F. 868 88 7302
> 
> www.um.es/sai www.um.es/ae
> 
> Blog: www.sae.saiblogs.inf.um.es
> 
> ---
> 
> Audentes fortuna iuva
> 
> [[alternative HTML version deleted]]
> 
> ___
> 
> R-help-es mailing list
> 
> R-help-es@r-project.org
> 
> https://stat.ethz.ch/mailman/listinfo/r-help-es [ 
> 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] Manejo de ficheros Linux desde R

2016-02-17 Por tema Proyecto R-UCA

Hola.

Pedro, ¿has valorado la posibilidad de que el script se ejecute con la
recepción del correo y no a intervalos periódicos?

La utilidad procmail se puede configurar para que lance un ejecutable
con la llegada de un correo. De esta forma no harías ejecuciones en
vacío (sin nada que procesar) y los resultados estarían al mismo
tiempo, casi, que llega el correo.

Saludos.

El dom, 14-02-2016 a las 18:05 +0100, Pedro Herrero Petisco escribió:
> Hola a todos.
> Tengo un proyecto entre manos que consiste en lo siguiente:
> Un suario manda a un correo electrónico un mail con un fichero
> adjunto,
> este fichero se descarga de forma automática en una carpeta de un
> sistema
> que corre bajo Linux (Ubuntu), una vez descargado quisiera generar un
> script de R de forma automática seleccionase el último fichero
> descargado e
> hiciese con él una serie de acciones que estén recogidas en un
> script.
> 
> Tanto la descarga de fichero como la ejecución del script se haría de
> forma
> periódica... pero lo que me preocupa es que no sé como hacer que R
> distinga
> el fichero a usar (que sería siempre el último recibido) ya que cada
> fichero tendrá un nombre distinto.
> 
> ¿Alguna idea?
> 
> Como dato adicional decir que soy absolutamente novato en el manejo
> de
> linux desde terminal, pero que estoy empezando a aprender ahora, y si
> la
> solución viniese por ejecutar comandos de Linux en lugar de R también
> me
> valdría.
> 
> 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

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

[R-es] Resultados electorales

2016-02-09 Por tema Proyecto R-UCA

 
Buenas:

Alguien ha hecho algo (que est� dispuesto a compartir) o conoce algo para 
"digerir" los resultados electorales que hay en 
http://www.infoelectoral.interior.es/min/ [ 
http://www.infoelectoral.interior.es/min/ ]

�O conoce alg�n otro sitio desde el que se puedan descargar en otro formato?

Un saludo.

Manuel Mu�oz M�rquez

[[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] Construcción de paquete

2015-06-09 Por tema Proyecto R-UCA


Buenas:

Estoy construyendo un paquete, cuyo fuente adjunto y necesito 
importar la función runs.test desde el paquete tseries y la 
función runs.test desde el paquete randtests. Esto hace que al 
hacer un chequeo del paquete con R --check --as-cran me dé como 
aviso replacing previous import by ‘tseries::runs.test’ when 
loading ‘RcmdrPlugin.UCA’ lo que no le gusta a los responsables 
de publicar el paquete.


¿Alguna sugerencia?

P.D.: Utilizo R version 3.2.0 (2015-04-16) sobre ubuntu, aunque no 
creo que influya.


Saludos.


--
http://www.uca.es/teloydisren
http://knuth.uca.es/R
--
Proyecto R-UCA
--
Nombre: Manuel Muñoz Márquez
Departamento: Departamento de Estadística e Investigación 
Operativa

Institución: Escuela Superior de Ingeniería de Cádiz
Organización: Universidad de Cádiz
--


RcmdrPlugin.UCA_2.0-2.tar.gz
Description: Binary data
___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es

38 matches

Mail list logo