[R-es] Abreviado de especies

[Marcelino de la Cruz]

Pues eso, lo dicho:


 > library(stringr)
 > datos<- read.table("CPUE.csv", header=T, row.names=1, sep=";")
 > cosa <- names(datos)
 > cosa2 <- str_split(cosa,"[.]")
 > cosa3 <- lapply(cosa2, function(x) str_sub(x, 0,c(1,100)))
 > sapply(cosa3, function(x) paste(x, collapse="."))
  [1] "C.labiatus"       "G.maraldi"        "G.argenteus" 
"G.macrophthalmus"
  [5] "G.mediterraneus"  "G.vulgaris"       "H.johnsonii" 
"H.italicus"
  [9] "L.lepidion"       "M.laevis"         "M.zugmayeri" 
"M.merluccius"
[13] "M.poutassou"      "M.macrophthalma"  "M.molva"          "M.moro" 

[17] "N.aequalis"       "P.blennoides"     "P.pollachius" 
"R.raninus"
[21] "T.scabrus"        "T.luscus"         "T.minutus"









El 14/01/2015 a las 19:27, JC Arronte escribió:
> Hola,
>
> Vaya desastre al mandar la cabecera de la base de datos. Al enviarlo, se ve�a bien, pero est� visto que por el camino la cosa se torci�.
>
> Siguiendo el consejo de Javier, he subido un peque�o fragmento al DropBox. He quitado algunas especies para no hacerlo muy largo. Espero que �sta vez no haya problemas.
>
> https://www.dropbox.com/s/q7zla50oq7owg8k/CPUE.csv?dl=0
>
> Un saludo y gracias
>
> Juan Carlos
>   		 	   		
> 	[[alternative HTML version deleted]]
>
>
>
> _______________________________________________
> R-help-es mailing list
> R-help-es en r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es
>