Data Preparation (19) - Prepare (Save Dataset)

다음과 같이 이상 살펴봤던 데이터세트를 저장할 수 있다.

> paste0("_", format(Sys.Date(), "%y%m%d")) // paste = concatenate 와 같이 문자열을 합쳐준다

[1] "_141206"

> dsdate <- paste0("_", format(Sys.Date(), "%y%m%d"))

> paste0(dsname, dsdate, ".RData")

[1] "weather_141206.RData"

> dsrdata <- paste0(dsname, dsdate, ".RData")

> save(ds, dsname, dspath, dsdate, target, risk, id, ignore, vars, nobs, omit, inputi, inputc, numi, numc, cati, catc, file=dsrdata) 

이후 해당 데이터세트를 로딩은 다음과 같이 한다.

> (load(dsrdata))

[1] "ds" "dsname" "dspath" "dsdate" "target" "risk" "id"

[8] "ignore" "vars" "nobs" "omit" "inputi" "inputc" "numi"

[15] "numc" "cati" "catc"

> dsname

[1] "weather"

> dspath

[1] "/home/gjw/R/x86_64-pc-linux-gnu-library/3.1/rattle/csv/weather.csv"

> dim(ds)

[1] 366 24

> id

[1] "date" "location"

> target

[1] "rain_tomorrow"

> risk

[1] "risk_mm"

> ignore

[1] "date" "location" "risk_mm" "temp_3pm"

[5] "pressure_9am" "temp_9am"

> vars

[1] "min_temp" "max_temp" "rainfall"

[4] "evaporation" "sunshine" "wind_gust_dir"

[7] "wind_gust_speed" "wind_dir_9am" "wind_dir_3pm"

[10] "wind_speed_9am" "wind_speed_3pm" "humidity_9am"