Re: [R-es] Sustitución NAs

2015-10-30 Por tema Carlos Ortega
Hola,

Esta una forma de hacerlo.
Fíjate que por la forma que has dado los datos, tienes blancos antes y
después de cada cadena y por no cambiarlo, en vez de utilizar
"is.na(datIn$COLEGIO)"
he tenido que hacer lo que ves datIn$COLEGIO== " NA "

#-
> Lines <- "
+ | NOMBRE  | LOCALIDAD | COLEGIO |
+ | JUAN | SANTANDER | A |
+ | ALBERTO | LA RIOJA | C  |
+ | MANUEL | MADRID | B |
+ | MARTA | MADRID | NA |
+ | IRENE | VALLADOLID | NA |
+ | LUCAS | LA RIOJA | C |
+ | LUIS | LA RIOJA | NA |
+ | ALBA | MADRID | B |
+ | ANTONIO | MADRID | NA |
+ | JOSE | VALLADOLID | D |
+ | JUAN | LA RIOJA | C |
+ "
>
> datIn <- read.table(textConnection(Lines), as.is=TRUE, header=TRUE,
sep="|")
> datIn <- datIn[, -c(1,5)]
> datIn
  NOMBRELOCALIDAD COLEGIO
1  JUANSANTANDER   A
2   ALBERTO LA RIOJA  C
3MANUEL   MADRID   B
4 MARTA   MADRID  NA
5 IRENE   VALLADOLID  NA
6 LUCAS LA RIOJA   C
7  LUIS LA RIOJA  NA
8  ALBA   MADRID   B
9   ANTONIO   MADRID  NA
10 JOSE   VALLADOLID   D
11 JUAN LA RIOJA   C
>
>  datIn$COLEGIO <- ifelse(datIn$LOCALIDAD==" MADRID " & datIn$COLEGIO=="
NA ", "B", datIn$COLEGIO)
>  datIn$COLEGIO <- ifelse(datIn$LOCALIDAD==" LA RIOJA " & datIn$COLEGIO==
" NA ", "C", datIn$COLEGIO)
>  datIn$COLEGIO <- ifelse(datIn$LOCALIDAD==" VALLADOLID " &
datIn$COLEGIO== " NA ", "D", datIn$COLEGIO)
>  datIn
  NOMBRELOCALIDAD COLEGIO
1  JUANSANTANDER   A
2   ALBERTO LA RIOJA  C
3MANUEL   MADRID   B
4 MARTA   MADRIDB
5 IRENE   VALLADOLIDD
6 LUCAS LA RIOJA   C
7  LUIS LA RIOJAC
8  ALBA   MADRID   B
9   ANTONIO   MADRIDB
10 JOSE   VALLADOLID   D
11 JUAN LA RIOJA   C


#-

Saludos,
Carlos Ortega
www.qualityexcellence.es

El 30 de octubre de 2015, 9:00, jose luis  escribió:

>
> Hola a todos. Pongo esta tabla sencilla a ver si alguien puede echarme un
> cable. En la columna COLEGIO salen unos NAs.
>
>
> | NOMBRE  | LOCALIDAD | COLEGIO |
> | JUAN | SANTANDER | A |
> | ALBERTO | LA RIOJA | C  |
> | MANUEL | MADRID | B |
> | MARTA | MADRID | NA |
> | IRENE | VALLADOLID | NA |
> | LUCAS | LA RIOJA | C |
> | LUIS | LA RIOJA | NA |
> | ALBA | MADRID | B |
> | ANTONIO | MADRID | NA |
> | JOSE | VALLADOLID | D |
> | JUAN | LA RIOJA | C |
>
>
>
>
> Pues bien, estoy buscando una orden que me diga que:si la LOCALIDAD es
> MADRID, sustituya los posibles NA de la variable COLEGIO por la letra B,
> para LA RIOJA que los sustituya por la letra C, y para VALLADOLID por la
> letra D.Saludos
> Jose Luis
>
>
>
>
>
> [[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] Sustitución NAs

2015-10-30 Por tema jose luis

Hola a todos. Pongo esta tabla sencilla a ver si alguien puede echarme un 
cable. En la columna COLEGIO salen unos NAs. 


| NOMBRE  | LOCALIDAD | COLEGIO |
| JUAN | SANTANDER | A |
| ALBERTO | LA RIOJA | C  |
| MANUEL | MADRID | B |
| MARTA | MADRID | NA |
| IRENE | VALLADOLID | NA |
| LUCAS | LA RIOJA | C |
| LUIS | LA RIOJA | NA |
| ALBA | MADRID | B |
| ANTONIO | MADRID | NA |
| JOSE | VALLADOLID | D |
| JUAN | LA RIOJA | C |




Pues bien, estoy buscando una orden que me diga que:si la LOCALIDAD es MADRID, 
sustituya los posibles NA de la variable COLEGIO por la letra B, para LA RIOJA 
que los sustituya por la letra C, y para VALLADOLID por la letra D.Saludos
Jose Luis




   
[[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] Seleccionar dos tklistbox a la vez

2015-10-30 Por tema Jesús Para Fernández
Buenas, 

Quiero, usando la libreria tcltk, poder seleccionar a la vez en dos listbox, 
pero s�lo me deja en uno u el otro, pero no los dos a la vez. 

He probado cambiando los selectmode a sus diferentes opciones (multiple, 
browse,single), pero cuando voy a seleccionar el segundo, me quita la seleccion 
del primero. 

El c�digo:

library(tcltk)
tt<-tktoplevel()
datos<<-c("uno","sdos","tres")

tl<-tklistbox(tt,height=4,selectmode="browse",background="white")
for(i in 1:3){tkinsert(tl,"end",datos[i])}
tkselection.set(tl,0)
tkpack(tl)

tl2<-tklistbox(tt,height=4,selectmode="browse",background="white")
for(i in 1:3){tkinsert(tl2,"end",datos[i])}
tkselection.set(tl2,2)
tkpack(tl2)


Gracias!!
Jes�s
  
[[alternative HTML version deleted]]

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

Re: [R-es] Seleccionar dos tklistbox a la vez

2015-10-30 Por tema Jesús Para Fernández

Era una bobaa, es añadir el 

exportselection="FALSE"

Gracias igualmente
From: j.para.fernan...@hotmail.com
To: r-help-es@r-project.org
Date: Fri, 30 Oct 2015 12:22:18 +0100
Subject: [R-es] Seleccionar dos tklistbox a la vez

Buenas, 
 
Quiero, usando la libreria tcltk, poder seleccionar a la vez en dos listbox, 
pero s�lo me deja en uno u el otro, pero no los dos a la vez. 
 
He probado cambiando los selectmode a sus diferentes opciones (multiple, 
browse,single), pero cuando voy a seleccionar el segundo, me quita la seleccion 
del primero. 
 
El c�digo:
 
library(tcltk)
tt<-tktoplevel()
datos<<-c("uno","sdos","tres")
 
tl<-tklistbox(tt,height=4,selectmode="browse",background="white")
for(i in 1:3){tkinsert(tl,"end",datos[i])}
tkselection.set(tl,0)
tkpack(tl)
 
tl2<-tklistbox(tt,height=4,selectmode="browse",background="white")
for(i in 1:3){tkinsert(tl2,"end",datos[i])}
tkselection.set(tl2,2)
tkpack(tl2)
 
 
Gracias!!
Jes�s
  
[[alternative HTML version deleted]]
 

___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es 
  
[[alternative HTML version deleted]]

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

[R-es] Paquete que autocargue

2015-10-30 Por tema Jesús Para Fernández
Buenas,

Estoy creando un paquete y me gustar�a crear un acceso directo en el escritorio 
que al pulsar sobre el, abra R, cargue el paquete [ library(mipaquete) ] y 
ejecute la funcion inicio()

�Es posible hacerlo?

Gracias
  
[[alternative HTML version deleted]]

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