[R-es] determinar el ancho de columnas

[MARCELINO DE LA CRUZ ROT]

Una versión más fácil y más rápida:

datos<- scan(file="rod.txt" , sep=" ")
datos <- matrix(datos, nc=9, byrow=T)


Saludos,

Marcelino


El 2013-02-22 20:26, Carlos Ortega escribió:
> Hola,
>
> Mira si este código te funciona:
>
>
> ###############################################################
>> dat.in <- readLines("rod.txt", n=-1)* #grabé las líneas en un 
>> fichero al
> estilo de lo que tendrás*
>> dat.in
> [1] "0.1576E-01  0.2021      0.3830E-02  0.1846      0.4018E-02  
> 0.8251E-03
> 0.8805E-01"
> [2] "  0.8347E-02   1.028"
>
> [3] " 0.1357E-01  0.3061      0.3747E-02  0.1077      0.3989E-02
>  0.4462E-02 0.8564E-01"
> [4] "  0.9126E-02  0.9451"
>
>> library(stringr)
>> dat.end <- str_trim(dat.in)* #Quito los espacios en blanco al 
>> principio y
> final de las líneas*
>> dat.end
> [1] "0.1576E-01  0.2021      0.3830E-02  0.1846      0.4018E-02  
> 0.8251E-03
> 0.8805E-01"
> [2] "0.8347E-02   1.028"
>
> [3] "0.1357E-01  0.3061      0.3747E-02  0.1077      0.3989E-02  
> 0.4462E-02
> 0.8564E-01"
> [4] "0.9126E-02  0.9451"
>
>>
>> j<-0
>> dat.gd <- 0
>> for(i in 1:length(dat.end)) {
> +
> +    if( length(unlist(str_split(dat.end[i], " "))) > 10 ) {
> +     j <- j+1
> +     dat.gd[j] <- paste(dat.end[i], dat.end[i+1], sep= " ")
> +    } else { next }
> + }
>>
>>
>> t.con<-textConnection(dat.gd)
>> dat.fin<-read.table(t.con, as.is=T)
>> close(t.con)
>>
>> dat.fin
>        V1     V2       V3     V4       V5        V6      V7       V8  
>   V9
> 1 0.01576 0.2021 0.003830 0.1846 0.004018 0.0008251 0.08805 0.008347 
> 1.0280
> 2 0.01357 0.3061 0.003747 0.1077 0.003989 0.0044620 0.08564 0.009126 
> 0.9451
> 
> #######################################################################
>
> Saludos,
> Carlos Ortega
> www.qualityexcellence.es
>
>
> El 22 de febrero de 2013 17:33, Marcuzzi, Javier Ruben <
> javier.ruben.marcuzzi en gmail.com> escribió:
>
>> Rod López
>>
>> Lo que usted envía si no entiendo mal no es un problema, ¿si 
>> cambia a un
>> monitor grande se soluciona automáticamente?, ¿que posibilidad es 
>> que
>> todo es una sola línea pero al visualizarla aparecen dos? O 
>> entendí todo
>> mal.
>>
>> No se como es BOA, pero en gibbs luego de tener los resultados, yo 
>> supe
>> utilizar as.data.frame, y continuar sin problemas.
>>
>> Javier Marcuzzi
>>
>> On vie, 2013-02-22 at 14:21 -0200, rod lopez wrote:
>> > BOA,
>>
>> _______________________________________________
>> R-help-es mailing list
>> R-help-es en 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 en r-project.org
> https://stat.ethz.ch/mailman/listinfo/r-help-es

-- 
MARCELINO DE LA CRUZ ROT
Universidad Politecnica de Madrid