Presence

This guide is also available as a vignette in the R console: vignette(Presence).

---

• Loading texts
• Calculating presences
• Plotting

Loading texts

data("rksp.0")
data("vndf.0")
texts <- rbind(rksp.0$mtext, vndf.0$mtext)

Calculating presences

pres <- list()
pres[[1]] <- presence(texts[drama=="rksp.0",])
#pres[[2]] <- presence(texts[drama=="vndf.0",])

Plotting

par(xpd=TRUE)
for (p in pres) {
  plot(p$active/p$scenes, p$passive/p$scenes, frame.plot = FALSE, xlim=c(0,1), ylim=c(0,1), xlab="Active", ylab="Passive")
  text(p$active/p$scenes, p$passive/p$scenes, labels=substr(p$figure,0,20), pos=3)
  
}