Kako SAS predstavlja jedan od zastupljenijih statističkih paketa u finansijskom i bankarskom sektoru, tako su se i u R-u razvijali dodatni paketi koji omogućavaju razmjenu podataka sa SAS-om.
Zadatak: Fajl (db_04.zip) dat u prilogu prvo otpakovati, pa zipovane fajlove sačuvati u radnom direktorijumu. Nakon toga importovati podatke iz SAS tabele i SAS .xport fajla u R objekat db.sas .
> #narednu komandu izvrsiti ukoliko sas7bdat paket vec nije instaliran
> #install.packages("sas7bdat")
>
> #importovati sas7bdat paket
> library(sas7bdat)
> db.sas <- read.sas7bdat("db_04.sas7bdat")
> #prikazati prva 2 reda data framea db.sas
> head(db.sas, 2)
x y
1 1 2
2 3 4
> #narednu komandu izvrsiti ukoliko rio paket vec nije instaliran
> #install.packages("rio")
>
> #importovati rio paket
> library(rio)
> db.sas <- import("db_04.sas7bdat")
> #prikazati prva 2 reda data framea db.sas
> head(db.sas, 2)
x y
1 1 2
2 3 4
> #narednu komandu izvrsiti ukoliko haven paket vec nije instaliran
> #install.packages("haven")
>
> #importovati haven paket
> library(haven)
> #SAS data set import
> db.sas.dat <- read_sas("db_04.sas7bdat")
> #prikazati prva 2 reda data framea db.sas
> head(db.sas.dat, 2)
# A tibble: 2 x 2
x y
<dbl> <dbl>
1 1 2
2 3 4
>
> #SAS Xport transport fajl import
> db.sas.xpt <- read_xpt("db_04.xport")
> #prikazati prva 2 reda data framea db.sas
> head(db.sas, 2)
X Y
1 1 2
2 3 4
>
> #provjera
> identical(db.sas.dat, db.sas.xpt)
[1] FALSE
> #razlika u nazivima kolona (R pravi razliku izmedju malih i velikih slova)
> names(db.sas.dat)
[1] "x" "y"
> names(db.sas.xpt)
[1] "X" "Y"
> #narednu komandu izvrsiti ukoliko rio paket vec nije instaliran
> #install.packages("Hmisc")
>
> #importovati Hmisc paket
> library(Hmisc)
> db.sas <- sasxport.get("db_04.xport")
Processing SAS dataset DB_04 ..
> #prikazati prva 2 reda data framea db.sas
> head(db.sas, 2)
x y
1 1 2
2 3 4
> #narednu komandu izvrsiti ukoliko rio paket vec nije instaliran
> #install.packages("SASxport")
>
> #importovati SASxport paket
> library(SASxport)
> db.sas <- SASxport::read.xport("db_04.xport")
> #prikazati prva 2 reda data framea db.sas
> head(db.sas, 2)
X Y
1 1 2
2 3 4
> #narednu komandu izvrsiti ukoliko rio paket vec nije instaliran
> #install.packages("foreign")
>
> #importovati foreign paket
> library(foreign)
> db.sas <- foreign::read.xport("db_04.xport")
> #prikazati prva 2 reda data framea db.sas
> head(db.sas, 2)
X Y
1 1 2
2 3 4
Dodatni detalji interakcije R-a i SAS-a prikazani su na kraju ovog .
