Deadpool
20th of November, 2018
Personality represents relatively consistent patterns of thinking, emotions and behavior that are typical for an individual.
Currently, there are multiple models of personality:
Dark Triad model comprises Machiavellianism, psychopathy and narcissism as malevolent personality traits.
The following codes were used to prepare the data and create the graphs (notice: ttm2018 is the name of the database)
lapply(c("ggplot2", "plotly", "haven"), library, character.only = T)
ttm2018 <- read_sav("C:/Users/xD/Downloads/ttm2018.sav")
ttm2018$Machiavellianism <- ttm2018$makijavelizam
ttm2018$Psychopathy <- ttm2018$psihopatija
plot1 <- ggplot(ttm2018, aes(x = Machiavellianism, y = Psychopathy)) +
geom_jitter(alpha = 0.5, col = "red") +
geom_smooth(method = "lm")
ggplotly(plot1)As it can be noticed from the previous graph, the relationship between psychopathy and Machiavellianism clearly exists, with more exaggerated psychopathic tendencies being related to more Machiavellian worldview.