Displaying 1 result from an estimated 1 matches for "oi1".
Did you mean:
i1
2009 Sep 19
1
Re-order columns
...tors=F)),stringsAsFactors=F)
names(oi) <- c("par","ix1","ix2");row.names(oi) <- NULL
oi$cnm <- sub("^\\s+((.*\\S)\\s+)?$", "\\2", paste("
",paste(oi$par,oi$ix1,oi$ix2," ",sep="."),sep=""))
oi1 <- oi[order(oi$par,as.integer(oi$ix1),as.integer(oi$ix2)),]
return(list(oi1=oi1,thix=thix))
}
x1 <- c("TABLE NO. 1: Gold" ,
" R T2 T1 O.4.1. O.3.1.
S.1.1. " ,
" 0 3.68000E+01 1.41000E+03 4.94000E+03 2.3...