Utöka den logistiska responsmodellen

Kom ihåg att bryggeriet installerade butiksdisplayer för att öka försäljningen av Hoppiness. För att stärka varumärket valde bryggeriet dessutom att lyfta fram Hoppiness genom att betona dess regionala karaktär. Dessa exponeringsaktiviteter hade även kombinerats med butiksdisplayer.

Börja med att sammanfatta åtgärderna DISPL.HOP, FEAT.HOP och FEATDISPL.HOP med hjälp av funktionen summary().

Fortsätt sedan med att förklara köpssannolikheterna för HOPPINESS med hjälp av price.ratio, DISPL.HOP, FEAT.HOP och FEATDISPL.HOP. Använd återigen funktionen glm() med argumentet family = binomial.

Beräkna slutligen marginaleffekterna för prediktorerna med hjälp av funktionen margins().