R-ohjelmointi.org
Tilastotieteellistä ohjelmointia R-kielellä
textConnection()
Esimerkki, että miten textConnection-funktiota voi käyttää luettaessa R:ään esim. pilkulla separoitua dataa vaikka suoraan tekstitiedostosta:
x <- "AB1,AN3 AM1,AN3 AN1,AN3,ASX AN3,AN1,AP6 AN3,ANX,AN1,AB3 AN3,APK" xy <- read.table(textConnection(x), header=FALSE) xy rm(xy) xy <- read.table(textConnection(x), sep=",", header=FALSE, na.strings="", fill=TRUE) xy closeAllConnections() |
Ja miltä tämä näyttää käytännössä:
> x <- "AB1,AN3 + AM1,AN3 + AN1,AN3,ASX + AN3,AN1,AP6 + AN3,ANX,AN1,AB3 + AN3,APK" > xy <- read.table(textConnection(x), header=FALSE) > xy V1 1 AB1,AN3 2 AM1,AN3 3 AN1,AN3,ASX 4 AN3,AN1,AP6 5 AN3,ANX,AN1,AB3 6 AN3,APK > rm(xy) > xy <- read.table(textConnection(x), sep=",", header=FALSE, na.strings="", fill=TRUE) > xy V1 V2 V3 V4 1 AB1 AN3 <NA> <NA> 2 AM1 AN3 <NA> <NA> 3 AN1 AN3 ASX <NA> 4 AN3 AN1 AP6 <NA> 5 AN3 ANX AN1 AB3 6 AN3 APK <NA> <NA> > closeAllConnections() > |
Vastaa