4.1 Strings

vector<-c("Jose Angel", "Diaz", "Garcia")

inicial<-paste(substr(vector[1],1,1),".", sep="")

nombre<-paste(inicial,vector[2],vector[3], sep = " ")

nombre
## [1] "J. Diaz Garcia"
fechas<-c("1992-3-16","1991-10-30","2017-10-19","2009-5-11")

fechas[grep(".-[13579]-.",fechas)]
## [1] "1992-3-16" "2009-5-11"

*Dado un string con varias palabras (e.g., “Esta es una frase, pero no cualquier frase.”) crea un vector con cada una de las plabras del string ([“Esta”,“es”,“una”,“frase”,“pero”,“no”,“cualquier”,“frase”]).

s<-"Esta es una frase, pero no cualquier frase."

vector<-strsplit(s,split ="[,. ]")[[1]]
strings<-c("Esta","es","una","frase","pero","no","cualquier","frase")
grep("[ae]",strings)
## [1] 1 2 3 4 5 7 8
dia<-c(1:30)
mes<-c(1:12)
año<-c("2016","2017")
dates<-as.Date(paste(año,mes,dia,sep = "-"))
dates
##  [1] "2016-01-01" "2017-02-02" "2016-03-03" "2017-04-04" "2016-05-05"
##  [6] "2017-06-06" "2016-07-07" "2017-08-08" "2016-09-09" "2017-10-10"
## [11] "2016-11-11" "2017-12-12" "2016-01-13" "2017-02-14" "2016-03-15"
## [16] "2017-04-16" "2016-05-17" "2017-06-18" "2016-07-19" "2017-08-20"
## [21] "2016-09-21" "2017-10-22" "2016-11-23" "2017-12-24" "2016-01-25"
## [26] "2017-02-26" "2016-03-27" "2017-04-28" "2016-05-29" "2017-06-30"