oppg10.1: Oppgave 10.1

In SiljeHermansen/laerdegR: Stottepakke Til "Laer Deg R"

Oppgave 10.1

Description

Respondentene til European Social Survey ble spurt om flere bakgrunnsvariabler. Estimer en binomisk logistisk modell hvor du kontrollerer for inntekt ved hjelp av variabelen Inntekt.

Hva skjer med effekten av holdning til inntektsutjevning (Utjevn)? Hvorfor skjer dette?

Usage

oppg10.1()
oppg10.1

Details

Effekten av holdning til inntektsutjevning svekkes og er ikke lenger signifikant. Dette er fordi respondenter med lavere inntekt er mer positive til utjevnende tiltak samtidig som Fremskrittspartiets velgere i gjennomsnitt tjener mindre enn Høyre-velgerne.

Author(s)

Silje Synnøve Lyder Hermansen

Examples

  data(kap10)

  #Partivalg modellert som funksjon av skepsis og utjevn.
  mod1<-glm(formula=FrP~Skepsis+Utjevn,
            data=kap10,
            family = binomial(link="logit"))

  #Partivalg modellert som funksjon av inntekt.
  mod2<-glm(formula=FrP~Skepsis+Utjevn+Inntekt,
            data=kap10,
            family = binomial(link="logit"))

  #Inspiser resultatet
  summary(mod1)
  summary(mod2)

  #Sjekk korrelasjon mellom inntekt og utjevn, samt inntekt og partivalg
  cor.test(kap10$Utjevn, kap10$Inntekt, na.rm=T)
  cor.test(kap10$FrP, kap10$Inntekt, na.rm=T)

SiljeHermansen/laerdegR documentation built on Sept. 2, 2022, 6:17 a.m.