2012-05-27 19 views
5

tengo una trama de datos en I que tiene este aspecto:Extraer una cadena a partir de una trama de datos

head(span_data) 

FECHA....DIA.Cá01TMax.Cá01HTMax.Cá01TMin.Cá01HTMin.Cá01TMed.Cá01HumMax.Cá01HumMin.Cá01HumMed.Cá01VelViento.Cá01DirViento.Cá01Rad.Cá01Precip.Cá01ETo 
1 -------- --- -------- --------- -------- --------- -------- ---------- ---------- --- ------- ------------- ------------- ------- ---------- ------- 
2 21-05-12 142  21.0  15:08  9.1  5:28  15.3  91.9  45.2  72.3   2.2   270.2 30.0  0.0 4.81 
3 20-05-12 141  19.1  15:12  11.3  4:50  14.6  94.9  46.6  74.4   2.6   273.0 23.2  12.6  4.0 
4 19-05-12 140  22.6  14:26  14.8  23:50  18.5  92.6  36.3  66.5   3.7   250.1 24.9  0.4 5.29 
5 18-05-12 139  23.4  14:30  17.2  23:58  19.4  87.4  55.5  72.0   3.1   218.5 24.2  0.0 4.75 
6 17-05-12 138  31.2  13:08  13.9  5:32  22.4  78.5  26.7  51.0   2.3   164.9 23.6  0.0 6.36 

En este momento, todas las filas son una cadena larga, y me va a ellos en la conversión a números. Sin embargo, cuando quiero extraer una de las filas, me sale

span_data[3,1] 
[1] 20-05-12 141  19.1  15:12  11.3  4:50  14.6  94.9  46.6  74.4   2.6   273.0 23.2  12.6  4.0 
4272 Levels: -------- --- -------- --------- -------- --------- -------- ---------- ---------- ---------- ------------- ------------- ------- ---------- ------- ... 

no quiero la parte "Niveles". ¿Cómo extraigo solo la cadena? (Estoy seguro de que esta pregunta ha sido contestada antes, pero no sabía exactamente cómo plantear la pregunta.)

+1

¿Cómo está poniendo los datos en el marco de datos? Esto parece algo que puedes hacer cuando importas los datos. – gauden

+1

Si originalmente era un archivo de texto o csv, entonces desea evitar leer la segunda línea. – Henry

Respuesta

5

podría intentar ...

a <- c("1-1","2-1","3-1") 
b <- 1:3 
ab<-as.data.frame(cbind(a,b)) 

x <- ab[3,1] # what you don't want 
x 
#[1] 3-1 
#Levels: 1-1 2-1 3-1 

z <- as.character(ab[3,1]) # without levels as it is no longer a factor 
z 
#[1] "3-1" 
2

Usted podría intentar esto:

newdat <- read.table(text=span_data[[1]], stringsAsFactors=FALSE) 
0

Sería mejor omitir las primeras 3 (?) Líneas y proporcionar el argumento colClasses apropiado para read.table. Pero puede obtener lo que quiere de lo que tiene con bastante facilidad:

as.character(span_data[3,1]) 
Cuestiones relacionadas