Statistical Graphics & Data Visualization

Memanfaatkan R Sweave

Dalam pembahasannya sebelumnya, saya menyertakan file Snw yang dapat digenerate menjadi file latex. Berikut ini langkah-langkah bikin dokumen analisis data dengan melibatkan library R tools yang menunjukkan bagaimana kita langsung mengambil data dari Yahoo! Finance misalnya atau dari Enciety Data Management untuk kemudian dapat diolah langsung menjadi dokumen analisis yang menarik.

1. Buat file Snw (Latex) dengan menyertakan script R didalamnya, seperti berikut ini :

%================================%
%    Membuat Dokumen Sederhana   %
% Oleh : Unung Istopo Hartanto   %
%     26 Mei 2005                %
%================================%

% Menentukan Format Dokumen
documentclass[A4,11pt]{article}

% Load Package tertentu, misalnya paket bahasa
usepackage[bahasa]{babel}
usepackage{here}

% Awal Dokumen
begin{document}

% Judul Artikel
title{Membuat Dokumen Sederhana\}
author{{sl Unung Istopo H}\[5mm]
e-mail: unung@enciety.com}

% Membangkitkan Tanggal Dokumen
date

% Membangkitkan Judul
maketitle

% Bikin Tulisan sederhana

Berikut ini adalah dua grafik yang secara otomatis dihasilkan dari analisis data enciety dan Yahoo! dengan menggunakan R Latex.

% Membangkitkan Plot 

begin{figure}[b]
caption{Balloon Plot Persentase Migrasi Jawa Timur Menurut Gender dan Area Tahun 2000  (Total Penduduk Jawa Timur tahun 2000 = 34.508.611 jiwa )}
label{fig:data01}
centering
< <fig=TRUE,echo=FALSE>>=
# Mengambil Data dari www.enciety.com
read.csv("http://www.enciety.com/data/manajemen/data/Prosentase%20Table%20Migrasi%20Jawa%20Timur%202000.csv") -> data
# Membuat Plot
require(gplots)
balloonplot(data$Area, data$Gender, data$Data,xlab="Area",ylab="Gender",main="Data : http://www.enciety.com/data/manajemen")
@
\
small{emph{"Panjang jari-jari lingkaran menunjukkan besar persentase migrasi pada suatu kelompok"}\
Sumber Data :	BPS Propinsi Jawa Timur, Sensus Penduduk 2000}
end{figure}

begin{figure}[b]
caption{NASDAQ COMPOSITE (^ISIC) - Open}
label{fig:data02}
centering
< <fig=TRUE,echo=FALSE>>=
# Mengambil Data dari yahoo.finance.com
read.csv("http://ichart.finance.yahoo.com/table.csv?s=%5EIXIC&a=00&b=1&c=2005&d=04&e=20&f=2005&g=d&ignore=.csv") -> mydata
mydata[length(mydata[,1]):1,] -> data.ts
# Plot Data
plot(ts(data.ts[,2]),axes=F,xlab="time - http://www.enciety.com",ylab="Open",main="Data : http://yahoo.finance.com",col="blue")
abline(v=seq(1,100,10),col="gray")
abline(h=seq(min(data.ts[,2]),max(data.ts[,2]),50),col="gray")
axis(1,at=seq(1,100,10),labels=format(data.ts[seq(1,100,10),1]))
axis(2,at=seq(min(data.ts[,2]),max(data.ts[,2]),50))
box()
@
end{figure}

% Akhir Dokumen
end{document}

2. Jalankan file Snw tersebut di R dengan command Sweave("Nama File")
3. Generate file tex menjadi latex
4. Membuat file dvi menjadi pdf

Langkah 2 – 4 ada di Bahasan Sebelumnya.

Silahkan Mencoba.

Oleh : Unung Istopo H

Tentunya kita sering berhadapan dengan teknis pembuatan laporan analisis data yang rumit dan melelahkan. Sehingga “cost” & “energi” yang dikeluarkan untuk pembuatan laporan itu jauh lebih besar dibandingkan dengan “cost” & “energi” yang kita habiskan untuk analisis datanya sendiri. Dalam bahasan kali ini kita akan coba untuk membuat dynamic report dengan menggunakan R Latex yang memanfaatkan fungsi tools. Fungsi ini dapat kita gunakan untuk membuat file latex dengan melakukan strukturisasi kode-kode latex plus include graphic yang dihasilkan dari analisis R. Sehingga istilahnya, rekan saya, Fajar Haribowo, researcher senior di enciety, mengatakan bahwa R itu “one stop shopping”:) Nggak bingung lagi bikin report.

Dalam pembuatan dynamic report ini, apa saja yang musti kita kuasai :
1. R Script
2. Latex Script, yang dapat kita pelajari di www.latex-project.org.

Langkah-langkah pembuatan dokumen sederhana dengan R dan Latex adalah sebagai berikut :

• Kita mulai dengan membuka aplikasi R di console
• Memanggil library tools
• Menggunakan fungsi Sweave untuk membangkitkan file RLatexEnciety.Snw ke latex
• Setelah file Latex jadi maka, diconsole Linux, kita dapat ketikkan :
• latex RLatexEnciety.tex -> membuat file latek menjadi dvi
• dvipdf RLatexEnciety.dvi -> membuat file dvi menjadi pdf

Berikut ini model scriptnya :

library(tools)
Sweave("RLatexEnciety.Snw")

[unung@IT05 Demo]$ latex RLatexEnciety.tex
[unung@IT05 Demo]$ dvipdf RLatexEnciety.dvi
[unung@IT05 Demo]$ xpdf RLatexEnciety.pdf

Hasilnya dapat kita nikmati sebagai RLatexEnciety.pdf.