Vad kännetecknar en viktig produkt?
Nu när vi har tagit fram en fungerande definition av en viktig produkt, ska vi undersöka om det finns egenskaper som kan vara korrelerade. Ett möjligt par är salesrank.from och salesrank.to. Vi kan ställa frågan om viktiga produkter tenderar att ha högre försäljningsrankning än de produkter som köps i nästa led. Vi gör detta genom att först ta ut de viktiga noderna, koppla ihop dem med den ursprungliga dataramen och sedan skapa en ny dataram med paketet dplyr. Vi skapar sedan en ny graf och färgar kanterna blå för flöden från hög rankning (1, 2, 3) till låg rankning (20, 21, 22), och röda för det omvända. Om rankning korrelerar med köp i nästa led ser vi mestadels blå länkar – annars blir fördelningen ungefär lika mellan rött och blått.
Datamängden ip_df innehåller information om viktiga produkter.
Den här övningen är en del av kursen
Fallstudier: Nätverksanalys i R
Interaktiv övning med praktiskt arbete
Testa den här övningen genom att slutföra den här exempelkoden.
# Select the from and to columns from ip_df
ip_df_from_to <- ip_df[c(___,___)]
# Create a directed graph from the data frame
ip_g <- graph_from_data_frame(___, directed = ___)
# Set the edge color. If salesrank.from is less than or
# equal to salesrank.to then blue else red.
edge_color <- ifelse(
ip_df$___ <= ip_df$___,
yes = ___,
no = ___
)