Re: [R-es] Encontrar un dato y añadirlo a otra columna
perfecto, pero en realidad habia simplificado el ejemplo
ya que no siempre se encuentra en la misma posicion
(y a veces es AV en mayuscula, otra en minuscula, otra entre parentesis etc..)
pero con sacarlo siguiendo este formato me vale, luego lo adapto a cada
circunstancia
nombre1
AV 23
PEPE 34
QWE
45 pepe AV 24
WERRR ER34
q AV 25
De: Marcelino de la Cruz Rot
Enviado: miércoles, 23 de septiembre de 2020 7:49
Para: Samura . ; Juan Carlos Lopez Mesa
Cc: r-help-es@r-project.org
Asunto: Re: [R-es] Encontrar un dato y añadirlo a otra columna
Hola:
Para este ejemplo concreto, es bastante sencillo. Por ejemplo:
sp <-strsplit(df$nombre1, " ")
df$Nombre1_numero<-sapply(sp, function(x) ifelse(x[1]=="AV",
as.numeric(x[2]), NA))
Saludos,
Marcelino
El 23/09/2020 a las 2:14, Samura . escribió:
> Con parse_number sacaria todos los numeros de la columna,
> pero lo que busco es sacar solo los que empiezan por AV y descartar el resto.
>
> De todas maneras muchas gracias, le voy a dar otra vuelta.
>
>
> De: Juan Carlos Lopez Mesa
> Enviado: martes, 22 de septiembre de 2020 21:32
> Para: Samura .
> Cc: r-help-es@r-project.org
> Asunto: Re: [R-es] Encontrar un dato y a�adirlo a otra columna
>
> Hola,
>
> prueba con esto
>
> df %>% mutate(var = parse_number(nombre1))
>
>
> Saludos
>
> El mar., 22 sept. 2020 a las 15:46, Samura .
> (mailto:tontit...@hotmail.com>>) escribi�:
> Buenas,
> A ver si alguien sabe como hacer lo siguiente:
>
> Tengo un df con letras y numeros, quiero que si me detecta un numero en
> concreto me a�ada dicho numero en otra columna.
>
> Algo asi
>
> df<-data.frame(c("AV 23","PEPE 34","QWE","AV 24","WERRR ER34","AV 25"))
> colnames(df)<-c("nombre1")
>
> df[grepl("AV 23",df$nombre1), "Nombre1_numero"]= "23"
> df[grepl("AV 24",df$nombre1), "Nombre1_numero"]= "24"
> df[grepl("AV 25",df$nombre1), "Nombre1_numero"]= "25"
> df
>
>
> nombre1 Nombre1_numero
> AV 23 23
> PEPE 34NA
> QWE NA
> AV 24 24
> WERRR ER34 NA
> AV 25 25
>
> osea, busca AV 23, 24, 25 en la columna, si lo encuentras pon el numero en
> otra columna, el resto de datos NA
>
> como son muchos, para no repetir siempre lo mismo habia pensado en algo asi
>
>
> df[grepl("AV \\d{2}",df$nombre1), "Nombre1_numero"]= "\\d{2}"
>
> pero no se como poner ese "\\d{2}" ultimo para que me coloque el numero.
>
> �Alguna idea?
>
> [[alternative HTML version deleted]]
>
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
> �Esta transmisi�n electr�nica es propiedad de la Universidad Nacional de
> Colombia, su contenido es confidencial y �nicamente lo puede recibir la
> persona o entidad a quien va dirigido. Se proh�be: Usar esta informaci�n para
> prop�sitos ajenos a la Universidad, divulgar su contenido a personas
> externas, reproducir total y/o parcialmente la informaci�n contenida. No se
> asume responsabilidad sobre informaci�n, opiniones o criterios contenidos en
> este correo electr�nico que no est�n relacionados con la Universidad. Si
> usted no es el destinatario de este correo electr�nico, se le notifica que el
> uso de esta informaci�n, as� como su difusi�n, distribuci�n o copia, est�
> estrictamente prohibida, por favor notifique al remitente inmediatamente por
> este mismo medio y elimine lo antes posible este mensaje. La Universidad
> Nacional de Colombia, identificada con NIT 899.999.063, con domicilio
> principal en la ciudad de Bogot� D.C. en la Carrera 45 # 26-85 Edif. Uriel
> Guti�rrez Bogot� D.C., Colombia y con tel�fono (+57 1) 316 50 00, en
> cumplimiento de la Ley 1581 de 2012 y el art�culo 15 del Decreto 1377 de
> 2013, como responsable del tratamiento de informaci�n de datos personales,
> desea informar a todas las personas cuyos datos personales se encuentran en
> nuestras bases de datos, que los mismos se encuentran bajo medidas que
> garantizan la seguridad, confidencialidad e integridad, y su tratamiento se
> realiza con base en nuestra Pol�tica de Tratamiento de Datos Personales, esta
> informaci�n se podr� consultar en la p�gina web
> unal.edu.co. Canal por el
> que tambi�n puede ejercer sus derechos como titular dentro de los cuales se
> contempla conocer, actualizar, rectificar y revocar las autorizaciones dadas
> a las finalidades aplicables para el desarrollo de las relaciones laborales,
> acad�micas, contractuales y todas las relacionadas con el objeto social de la
> Universidad.�
>
>[[alternative HTML version deleted]]
>
>
>
Re: [R-es] Insertar punto en numero
¿Posición 4? Sería la 6, ¿no? x <- "43.0522"; paste0(substring(x, 1, 5), ".", substring(x, 6)) > El 23 sept 2020, a las 10:27, jose luis via R-help-es > escribió: > > Buenos días. ¿como puedo insertar un punto en la posicion 4, de forma que me > quede en vez de43.0522 > 43.05.22SaludosJose 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-help-es mailing list R-help-es@r-project.org https://stat.ethz.ch/mailman/listinfo/r-help-es
[R-es] Insertar punto en numero
Buenos días. ¿como puedo insertar un punto en la posicion 4, de forma que me quede en vez de43.0522 43.05.22SaludosJose 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
Re: [R-es] ORDEN GRÁFICO POR MESES
Lo que dice Marcelino es buena solución, es lo que yo hago.
El mié., 23 sept. 2020 8:59, Marcelino de la Cruz Rot <
marcelino.delac...@urjc.es> escribió:
> Hola:
> Si el orden de los niveles de tu factor no es el que quieres, puedes
> especificar tu orden preferido al crear el factor (o posteriormente: ver
> ejemplo debajo). De esa manera te representará cada nivel en el orden
> que tú quieres. Esto vale, lógicamente, tanto para datos de fechas como
> para cualquier otra variable categórica.
>
> Saludos,
>
> Marcelino
>
> > X <- factor(c("ENE", "FEB", "MAR", "ABR", "MAY", "JUN", "JUL", "AGO",
> "SEP", "OCT", "NOV", "DIC"))
> > X
> [1] ENE FEB MAR ABR MAY JUN JUL AGO SEP OCT NOV DIC
> Levels: ABR AGO DIC ENE FEB JUL JUN MAR MAY NOV OCT SEP
>
> > X2 <- factor(X, levels=c("ENE", "FEB", "MAR", "ABR", "MAY", "JUN",
> "JUL", "AGO", "SEP", "OCT", "NOV", "DIC"))
> > X2
> [1] ENE FEB MAR ABR MAY JUN JUL AGO SEP OCT NOV DIC
> Levels: ENE FEB MAR ABR MAY JUN JUL AGO SEP OCT NOV DIC
> >
>
>
> El 23/09/2020 a las 8:23, jose luis via R-help-es escribió:
> > Holaimagino que tienes la variable mes como número o como factor. Para
> que lo ordene cronologicamente debe estar en formato fecha, por ejemplo así:
> > Diario_S2$mes<-as.Date( Diario_S2, format = "%d/%m/%Y" )
> > En miércoles, 23 de septiembre de 2020 02:53:42 CEST, Jesus MARTIN
> F. escribió:
> >
> > Hola,
> >
> >Estoy haciendo un gráfico con:
> >
> >
> #
> > ## GRAFICO BARRAS : VALORES AL DEBE MENSUALIZADO
> > ggplot(Diario_S2, aes(x=mes_AAA, by = MES , y=ARS_DEB))+ # ASIGNAR
> > VARIABLES
> > geom_bar(stat="identity", width=0.7, # ANCHO BARRAS
> > colour="grey", fill="darkgreen", # ASPECTO (borde y
> > relleno)
> > position = "dodge")+
> > scale_fill_brewer(palette = "paired")+ # PALETA DE COLORES
> > labs(x="MESES", y="IMPORTES EN ARS",color="Tipo")+ # TITULOS
> EJES
> > ggtitle("VALORES AL DEBE POR MES") # TITULO
> > GRAFICO
> >
> #
> >
> >El problema es que me està ordenando las barras por el mes
> alfabéticamente
> > ,
> >
> > Los valores de X, son:
> >
> > [1] ENE FEB MAR ABR MAY JUN JUL AGO SEP OCT NOV DIC
> > Levels: ABR AGO DIC ENE FEB JUL JUN MAR MAY NOV OCT SEP
> >
> >El gráfico me está apareciendo ordenado alfabéticamente, según
> "Levels" y
> > necesito que quede por meses, respetando el orden de los meses y no
> > ordenándolos alfabéticamente,
> >
> >Gracias,
> >
> >Jesús
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> > _
> >
> > *Jesús MARTÍN FRADE *
> > Skype:jmfpas
> > Tel (celular):(011) 154-946-2131 (Argentina)
> > (+54) 911-4946-2131 (Internacional)
> > Facebook http://www.facebook.com/jesusmartinfrade
> >
> > [image: Mailtrack]
> > <
> https://mailtrack.io?utm_source=gmail_medium=signature_campaign=signaturevirality5;
> >
> > Remitente
> > notificado con
> > Mailtrack
> > <
> https://mailtrack.io?utm_source=gmail_medium=signature_campaign=signaturevirality5;
> >
> > 22/09/20
> > 21:50:58
> >
> > [[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
> > .
>
>
> --
> Marcelino de la Cruz Rot
> Depto. de Biología y Geología
> Física y Química Inorgánica
> Universidad Rey Juan Carlos
> Móstoles España
>
> ___
> R-help-es mailing list
> R-help-es@r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>
[[alternative HTML version deleted]]
___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es
Re: [R-es] EXTRAER MES EN LETRAS Y CASTELLANO
Hola:
Otra forma, más sencilla todavía.
Saludos,
Marcelino
mes_numero = sample(1:12, 50, replace = TRUE)
mes_chr = c('ENE', 'FEB', 'MAR', 'ABR', 'MAY', 'JUN', 'JUL', 'AGO',
'SEP','OCT','NOV', 'DIC')
nueva_variable <- mes_chr[mes_numero]
El 23/09/2020 a las 1:11, Carlos Ortega escribió:
Hola,
Esta es una forma de hacerlo...
# Este es el dataframe que tiene las referencias cruzadas
mi_df <- data.frame(
+ mes_num = 1:12,
+ mes_chr = c('ENE', 'FEB', 'MAR', 'ABR', 'MAY', 'JUN', 'JUL', 'AGO',
'SEP','OCT','NOV', 'DIC')
+ )
# Este es tu data.frame con la columna con los numeros a cambiar
a_cambiar <- data.frame(
+ mes_salteados = sample(1:12, 50, replace = TRUE)
+ )
resul_tados <- a_cambiar %>% left_join(mi_df, by = c('mes_salteados' =
'mes_num'))
head(resul_tados)
mes_salteados mes_chr
1 5 MAY
2 5 MAY
3 4 ABR
4 4 ABR
510 OCT
611 NOV
Saludos,
Carlos Ortega
www.qualityexcellence.es
El mar., 22 sept. 2020 a las 23:58, Jesus MARTIN F. ()
escribió:
Buenas tardes,
Estoy precisando generar una nueva variable que contenga el mes en tres
letras, por ejemplo: ENE , FEB, MAR , ABR y así sucesivamente a partir de
los valores que ahora tengo en el Dataset, que son 1, 2, 3, 4 y así
sucesivamente.
Entiendo que sería con mutate, pero consulto acerca del comando
completo..
Gracias,
Jesús
_
*Jesús MARTÍN FRADE *
Skype:jmfpas
Tel (celular):(011) 154-946-2131 (Argentina)
(+54) 911-4946-2131 (Internacional)
Facebook http://www.facebook.com/jesusmartinfrade
[image: Mailtrack]
<
https://mailtrack.io?utm_source=gmail_medium=signature_campaign=signaturevirality5;
Remitente
notificado con
Mailtrack
<
https://mailtrack.io?utm_source=gmail_medium=signature_campaign=signaturevirality5;
22/09/20
18:54:37
[[alternative HTML version deleted]]
___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es
--
Marcelino de la Cruz Rot
Depto. de Biología y Geología
Física y Química Inorgánica
Universidad Rey Juan Carlos
Móstoles España
___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es
Re: [R-es] Encontrar un dato y añadirlo a otra columna
Hola:
Para este ejemplo concreto, es bastante sencillo. Por ejemplo:
sp <-strsplit(df$nombre1, " ")
df$Nombre1_numero<-sapply(sp, function(x) ifelse(x[1]=="AV",
as.numeric(x[2]), NA))
Saludos,
Marcelino
El 23/09/2020 a las 2:14, Samura . escribió:
Con parse_number sacaria todos los numeros de la columna,
pero lo que busco es sacar solo los que empiezan por AV y descartar el resto.
De todas maneras muchas gracias, le voy a dar otra vuelta.
De: Juan Carlos Lopez Mesa
Enviado: martes, 22 de septiembre de 2020 21:32
Para: Samura .
Cc: r-help-es@r-project.org
Asunto: Re: [R-es] Encontrar un dato y a�adirlo a otra columna
Hola,
prueba con esto
df %>% mutate(var = parse_number(nombre1))
Saludos
El mar., 22 sept. 2020 a las 15:46, Samura .
(mailto:tontit...@hotmail.com>>) escribi�:
Buenas,
A ver si alguien sabe como hacer lo siguiente:
Tengo un df con letras y numeros, quiero que si me detecta un numero en
concreto me a�ada dicho numero en otra columna.
Algo asi
df<-data.frame(c("AV 23","PEPE 34","QWE","AV 24","WERRR ER34","AV 25"))
colnames(df)<-c("nombre1")
df[grepl("AV 23",df$nombre1), "Nombre1_numero"]= "23"
df[grepl("AV 24",df$nombre1), "Nombre1_numero"]= "24"
df[grepl("AV 25",df$nombre1), "Nombre1_numero"]= "25"
df
nombre1 Nombre1_numero
AV 23 23
PEPE 34NA
QWE NA
AV 24 24
WERRR ER34 NA
AV 25 25
osea, busca AV 23, 24, 25 en la columna, si lo encuentras pon el numero en otra
columna, el resto de datos NA
como son muchos, para no repetir siempre lo mismo habia pensado en algo asi
df[grepl("AV \\d{2}",df$nombre1), "Nombre1_numero"]= "\\d{2}"
pero no se como poner ese "\\d{2}" ultimo para que me coloque el numero.
�Alguna idea?
[[alternative HTML version deleted]]
___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es
�Esta transmisi�n electr�nica es propiedad de la Universidad Nacional de Colombia, su
contenido es confidencial y �nicamente lo puede recibir la persona o entidad a quien va
dirigido. Se proh�be: Usar esta informaci�n para prop�sitos ajenos a la Universidad,
divulgar su contenido a personas externas, reproducir total y/o parcialmente la informaci�n
contenida. No se asume responsabilidad sobre informaci�n, opiniones o criterios contenidos
en este correo electr�nico que no est�n relacionados con la Universidad. Si usted no es el
destinatario de este correo electr�nico, se le notifica que el uso de esta informaci�n, as�
como su difusi�n, distribuci�n o copia, est� estrictamente prohibida, por favor notifique
al remitente inmediatamente por este mismo medio y elimine lo antes posible este mensaje.
La Universidad Nacional de Colombia, identificada con NIT 899.999.063, con domicilio
principal en la ciudad de Bogot� D.C. en la Carrera 45 # 26-85 Edif. Uriel Guti�rrez Bogot�
D.C., Colombia y con tel�fono (+57 1) 316 50 00, en cumplimiento de la Ley 1581 de 2012 y
el art�culo 15 del Decreto 1377 de 2013, como responsable del tratamiento de informaci�n de
datos personales, desea informar a todas las personas cuyos datos personales se encuentran
en nuestras bases de datos, que los mismos se encuentran bajo medidas que garantizan la
seguridad, confidencialidad e integridad, y su tratamiento se realiza con base en nuestra
Pol�tica de Tratamiento de Datos Personales, esta informaci�n se podr� consultar en la
p�gina web unal.edu.co. Canal por el que
tambi�n puede ejercer sus derechos como titular dentro de los cuales se contempla conocer,
actualizar, rectificar y revocar las autorizaciones dadas a las finalidades aplicables para
el desarrollo de las relaciones laborales, acad�micas, contractuales y todas las
relacionadas con el objeto social de la Universidad.�
[[alternative HTML version deleted]]
___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es
--
Marcelino de la Cruz Rot
Depto. de Biología y Geología
Física y Química Inorgánica
Universidad Rey Juan Carlos
Móstoles España
___
R-help-es mailing list
R-help-es@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-help-es
Re: [R-es] ORDEN GRÁFICO POR MESES
Holaimagino que tienes la variable mes como número o como factor. Para que lo
ordene cronologicamente debe estar en formato fecha, por ejemplo así:
Diario_S2$mes<-as.Date( Diario_S2, format = "%d/%m/%Y" )
En miércoles, 23 de septiembre de 2020 02:53:42 CEST, Jesus MARTIN F.
escribió:
Hola,
Estoy haciendo un gráfico con:
#
## GRAFICO BARRAS : VALORES AL DEBE MENSUALIZADO
ggplot(Diario_S2, aes(x=mes_AAA, by = MES , y=ARS_DEB))+ # ASIGNAR
VARIABLES
geom_bar(stat="identity", width=0.7, # ANCHO BARRAS
colour="grey", fill="darkgreen", # ASPECTO (borde y
relleno)
position = "dodge")+
scale_fill_brewer(palette = "paired")+ # PALETA DE COLORES
labs(x="MESES", y="IMPORTES EN ARS",color="Tipo")+ # TITULOS EJES
ggtitle("VALORES AL DEBE POR MES") # TITULO
GRAFICO
#
El problema es que me està ordenando las barras por el mes alfabéticamente
,
Los valores de X, son:
[1] ENE FEB MAR ABR MAY JUN JUL AGO SEP OCT NOV DIC
Levels: ABR AGO DIC ENE FEB JUL JUN MAR MAY NOV OCT SEP
El gráfico me está apareciendo ordenado alfabéticamente, según "Levels" y
necesito que quede por meses, respetando el orden de los meses y no
ordenándolos alfabéticamente,
Gracias,
Jesús
_
*Jesús MARTÍN FRADE *
Skype: jmfpas
Tel (celular): (011) 154-946-2131 (Argentina)
(+54) 911-4946-2131 (Internacional)
Facebook http://www.facebook.com/jesusmartinfrade
[image: Mailtrack]
Remitente
notificado con
Mailtrack
22/09/20
21:50:58
[[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
