Böl ve yönet: Karşılaştırma bulutu için polariteyi kullanma

Artık polaritenin bir derlemeyi nasıl bölebileceğini gördüğüne göre, hadi bunu uygulayalım! Bu kod, bir derlemeyi duyguya göre bölme adımlarında seni yönlendirecek; böylece bilgiyi bütünüyle değil de alt kümeler içinde inceleyebileceksin.

R oturumunda "The Wonderful Wizard of Oz" metnine polarity() uygulanarak oluşturulmuş oz_pol bulunuyor.

Basitlik için, derlemeyi polarite puanına göre bölecek pol_subsections() adlı basit bir özel fonksiyon oluşturduk. Önce fonksiyon, her satırı derlemenin bir cümlesi ya da belgesi olan bir veri çerçevesi alır. Veri çerçevesi, polarite değerlerinin 0'dan büyük ya da küçük olduğu yerlere göre alt kümelere ayrılır. Son olarak, pozitif ve negatif cümleler (sıfır olmayan polariteler), terimler tek bir derlemede gruplanacak şekilde collapse parametresi ile birleştirilir. En sonda da iki belge, iki ayrı belgeden oluşan tek bir vektörde birleştirilir.

pol_subsections <- function(df) {
  x.pos <- subset(df$text, df$polarity > 0)
  x.neg <- subset(df$text, df$polarity < 0)
  x.pos <- paste(x.pos, collapse = " ")
  x.neg <- paste(x.neg, collapse = " ")
  all.terms <- c(x.pos, x.neg)
  return(all.terms)
}

Bu noktada tarafsız cümleleri çıkardın ve kalan metni düzenlemeye odaklanmak istiyorsun. Bu egzersizde nesneleri fonksiyonlara iletmek için yine %>% operatörünü kullanacağız. Basit bir temizlikten sonra görselleştirmeyi oluşturmak için comparison.cloud() kullan.