R’da regresyon modellerini Excel’e aktarmak

R kullanarak yaptığım ilk regresyon modelimin sonuçlarını çalışmama aktarırken write.csv’den tutun da write ile başlayan bütün dışa aktarımı fonksiyonlarını denedim. Hiçbiri kabul etmedi summary fonksiyonu ile çalışmayı. Biraz da el hızıma güvenip babadan kalma bir yöntemi kullanmaya başladım: kadar: kopyala + yapıştır. Söz konusu olan R’ın regresyon sonuç tabloları ise bu yöntem biraz uğraştırıyor açıkçası. Excel’e aktardığım tabloların biçimini satır satır düzeltmek gerekiyor aslında. Satırları sütunlara çevirmeden faydalanıp istediğim gibi biçimlendiriyordum tablolarım. R için düzenli ziyaret ettiğim Stack Exchange’de denk geldiğim cevaplar da çoğunlukla “stargazer” paketini tavsiye ediyordu.. Aklımın hep kenarında olup kurulu paketlerde aylardır bekleyen stargazer‘i denemeye kadar verdim bir gün. HTML biçiminde dosyaya aktardığım tabloları Excel’e aktarmak gerçekten çok basitleşti o andan itibaren. Kullanınca da fark ettim ki aslında benim teker teker yaptığım her adımı stargazer bitirilmiş halde önüme sürüyor. Eğer LaTeX diline hakimseniz tabloların sunumunu daha da geliştirmek elinizde. Paketin anlatımı kılavuza dayanarak yapılmıştır.

Önce paketi kuralım, sonra da çağıralım

>install.packages("startgazer")
>library(stargazer)

Sonuçlarını tablolara yansıtmak istediğimiz üç farklı model oluşturualım

>linear.1 <- lm(rating ~ complaints + privileges + learning + raises + critical, data=attitude)
>linear.2 <- lm(rating ~ complaints + privileges + learning, data=attitude)

>attitude$high.rating <- (attitude$rating > 70)
>probit.model <- glm(high.rating ~ learning + critical + advance, data=attitude, family = binomial(link = "probit"))

Pakete ait stargazer fonksiyonunu en temel haliyle kullanmak için aşağıdaki komutu çalıştırın

>stargazer(linear.1, linear.2, probit.model, title="Karşılaştırmalı Sonuçlar", digits=4, align=TRUE)

Yukarıdaki formül size sonuçları LaTeX formatında ve ondalık hanade 4 basamak ile verecek verecek. Bugüne kadar hiç LaTeX ile çalışmadıysanız (benim gibi), sonuçları HTML olarak elde etmeniz mümkün.

>stargazer(linear.1, linear.2, probit.model, title="Karşılaştırmalı Sonuçlar", align=TRUE,digits=4,type="html")

Peki sonuçları Excel’e aktarmak için ne yapmak gerekiyor?

>write.csv(stargazer(linear.1, linear.2, probit.model, title="Karşılaştırmalı Sonuçlar", align=TRUE,digits=4,type="html"),file="model.csv")

CSV dosyasını Excel veya Calc ile açın, ve B kolonunda <table> ile </table> arasındaki bütün kodları kopyalayıp Windows’un Not Defteri’ne (notepad.exe) yapıştırın. Dosyayı HTML uzantısı ile kaydedip tarayıcınız ile açın ve istediğiniz gibi düzenleyin.

Adım adım gittiğinizde emin olun ki R’dan Excel’e kopyalayıp yapıştırmaktan daha kolay olduğunu göreceksiniz. Kolay gelsin.

Leave a comment

Your email address will not be published. Required fields are marked *

This site uses Akismet to reduce spam. Learn how your comment data is processed.