Zadatak: Generisati vjestački data frame (db) i eksportovati ga u .xport SAS format.
> #narednu komandu izvrsiti ukoliko foreign paket vec nije instaliran
> #install.packages("foreign")
>
> #importovati foreign paket
> library(foreign)
> #generisati vjestacki data frame
> db <- data.frame(x = 1:10, y = letters[1:10])
> head(db, 2)
x y
1 1 a
2 2 b
> #eksport fajl i SAS import kod
> write.foreign(df = db, datafile = "db_foreign",
+ codefile = "SAS_code_import.sas",
+ package = "SAS")
Prilikom eksport podataka putem paketa foreign kreira se dodatni fajl koji sadrzi SAS kod za import eksportovanih podataka. Za prethodni primjer eksportovani kod (iz fajla SAS_code_import.sas ) može se direktno izvršiti u SAS-u :
* Written by R;
* write.foreign(df = db, datafile = "db_foreign", codefile = "SAS_code_import.sas", ;
DATA rdata ;
LENGTH
y $ 1
;
INFILE "db_foreign"
DSD
LRECL= 10 ;
INPUT
x
y $
;
RUN;
> #narednu komandu izvrsiti ukoliko rio paket vec nije instaliran
> #install.packages("SASxport")
>
> #importovati SASxport paket
> library(SASxport)
> #generisati vjestacki data frame
> db <- data.frame(x = 1:10, y = letters[1:10])
> head(db, 2)
x y
1 1 a
2 2 b
> #eksport Xport formati
> write.xport(db, file = "db_sasxport.xport")
Pored navedenih primjera eksporta podataka iz R-a u odgovarajući SAS format, mogući su standardni načini razmjene podataka (eksport podataka iz R-a u .csv ili .txt fajlove i njihov import u SAS).
