R'de PCH Eğitimi

Grafik karakteri ya da pch, bir dizi R fonksiyonunda çizilecek karakteri ayarlamak için standart bir argümandır.

Açıklayıcı metin bir grafiğe eksen etiketleri, başlıklar, lejantlar veya doğrudan grafiğe eklenen metin gibi çeşitli biçimlerde eklenebilir. R'deki temel grafik fonksiyonları genellikle varsayılan olarak eksen etiketleri oluşturur; ancak bunlar, kendi x ekseni etiketimizi vermemize olanak tanıyan xlab() ve kendi y ekseni etiketimizi vermemize olanak tanıyan ylab() argümanlarıyla değiştirilebilir.

Bazı temel grafik fonksiyonları varsayılan başlıklar da sağlar; ancak burada görüldüğü gibi bunlar da değiştirilebilir:

library(MASS)
par(mfrow = c(1, 2))
plot(density(geyser$waiting))
plot(density(geyser$waiting), main = "Estimated density: \n Old Faithful waiting times")

Soldaki grafik, yoğunluk fonksiyonu tarafından döndürülen varsayılan başlığı kullanır; bu da grafiğin bu fonksiyonun varsayılan seçenekleriyle üretildiğini ve yoğunluğunu çizdiğimiz değişkenin R belirtimini verdiğini söyler. Sağdaki grafikte ise bu varsayılan başlık, isteğe bağlı main argümanı belirtilerek değiştirilmiştir. Geri dönüş karakterini, ters bölü \/ n'yi dahil ederek bu karakter dizisinde iki satırlı bir başlık oluşturduğumuza dikkat edin.

text() Fonksiyonu

lines ve points fonksiyonları gibi, text de mevcut grafiğe açıklayıcı metin eklememizi sağlayan düşük seviyeli bir grafik fonksiyonudur. Bunu yapmak için metnin görünmesi gereken grafikteki koordinatları belirten x ve y değerlerini ve eklenecek metni belirten, karakter vektörü olan labels'ı belirtmemiz gerekir.

text(x, y, adj)

Varsayılan olarak, grafiğe eklenen metin belirtilen x değerlerinde ortalanır; ancak isteğe bağlı adj argümanı hizalamayı değiştirmek için kullanılabilir.

text() fonksiyonundaki adj argümanının metnin yatay konumunu belirlediği ve 0 (sola yaslı metin) ile 1 (sağa yaslı metin) arasında herhangi bir değer alabileceği unutulmamalıdır. Aslında, bu argüman bu aralığın dışındaki değerleri de alabilir. Yani, bu değeri negatif yapmak metnin belirtilen x konumunun sağından başlamasına neden olur. Benzer şekilde, adj'yi 1'den büyük yapmak metnin x konumunun solunda bitmesine neden olur.

library(MASS)
plot(UScereal$fibre)
text(5, 28, "<-- Outliers [left-justified text at (5, 28)]", adj = 0)
text(65, 23, "[Right-justified text at (65, 23)]", adj = 1, col = "red")
text(5, 28, "[Centered text (default) at (31, 18)]", col = "blue")

Yazı Tipleri, Yönelimler ve Diğer Metin Özellikleri

Aşağıda, text fonksiyonuna verilecek isteğe bağlı argümanlarla eklenen metnin görünümünün nasıl değiştirilebileceğine dair bazı yolları görüyoruz. Varsayılan olarak metin sayfa üzerinde yatay olarak oluşturulur; ancak bu, yatay eksene göre yönelim açısını belirleyen srt argümanıyla değiştirilebilir.

Ardından, kırmızı metin srt'nin pozitif 30 derece olarak belirtilmesi sonucu yukarı doğru açılanırken, yeşil metin srt eşittir -45 belirtilerek aşağı doğru açılanır.

Metnin rengini col argümanıyla belirtebiliriz ve kırmızı metin, metin boyutunu cex argümanıyla değiştirebileceğimizi gösterir. cex = 1.2 belirterek metni normalden yüzde 20 daha büyük olacak şekilde ayarladık.

Bu örnekte değiştirilen bir diğer metin özelliği de font argümanıyla ayarlanan yazı tipidir. Varsayılan değer font = 1'dir ve normal metni belirtir; font = 2 kalın, font = 3 italik ve font = 4 hem kalın hem italik metni belirtir.

library(MASS)
plot(Boston$rad)

# "Inner city" with adjusted colour and rotation
text(350, 24, adj = 1, "Inner city? -->", srt = 30, font = 2, cex = 1.2, col = "red")

# "Suburbs" with adjusted colour and rotation
text(100, 15, "Suburbs? -->", srt = -45, font = 3, col = "green")

title("Text with varying orientations, fonts, sizes & colors")

Metin Konumu, Boyutu ve Yazı Tipini Ayarlama

Aşağıdaki örnekte şunları yapacaksınız:

• Cars93 veri çerçevesinden MPG.city ile Horsepower grafiğini, veriler açık daireler olarak (varsayılan pch) temsil edilecek şekilde oluşturun.
• Tüm 3 silindirli arabaları içeren satır numaralarını belirleyen which() fonksiyonunu kullanarak index3 değişkenini oluşturun.
• Grafikte 3 silindirli arabaları temsil eden tüm noktaların üzerine dolu daireler, pch = 16, bindirmek için points() fonksiyonunu kullanın.
• Daha önce olduğu gibi Make değişkeniyle text() fonksiyonunu kullanarak 3 silindirli arabaların sağına etiketler ekleyin; ancak şimdi etiketleri daha da sağa taşımak için adj = 0.2 kullanın, etiket boyutunu yüzde 20 artırmak için cex argümanını ve etiketleri kalın italik yapmak için font argümanını kullanın.

# Plot MPG.city vs. Horsepower as open circles
plot(Cars93$Horsepower, Cars93$MPG.city)

# Create index3, pointing to 3-cylinder cars
index3 <- which(Cars93$Cylinders == 3)

# Highlight 3-cylinder cars as solid circles
points(Cars93$Horsepower[index3],
       Cars93$MPG.city[index3],
       pch = 16)

# Add car names, offset from points, with larger bold text
text(Cars93$Horsepower[index3],
     Cars93$MPG.city[index3],
     Cars93$Make[index3],
     adj = -0.2, cex = 1.2, font = 4)

Yukarıdaki kodu çalıştırdığımızda aşağıdaki sonuç elde edilir:

Kendiniz deneyin.

Grafiklere metin ekleme hakkında daha fazla bilgi edinmek için kursumuz R ile Veri Görselleştirme kapsamındaki bu videoyu izleyin.

Bu içerik, Ronald Pearson tarafından hazırlanan DataCamp’in R ile Veri Görselleştirme kursundan alınmıştır.