CODE NOT GIVING CORRECT PERCENTAGES

How People Rate the 'Star Wars' Movies

How often each film was rated in the top, middle and bottom third $($by $471$ respondents who have seen all six films$)$

$**$ Homework note: Click here to see a version of this plot generated in Altair.

$2\mathrm{.}2$ How people rate the 'Star Wars' movie? Recreate the above image using altair $(10$ Points$)$

MY CODE NOT GIVING CORRECT PERCENTAGES

def genRateVis$($inpf$,$ eps, names$=$namesDict, names$\_$l$=$namesList$)$:

# input: inpf, the star wars dataset

# input: eps, the list of episodes

# input: names $-$ a dictionary of abbreviations to names $($default: namesDict$)$

# input: names$\_$l $-$ a list of all the movies in series order $($default: namesList$)$

# output: the Altair visualization as described above

names$\_1=[$

'The Phantom Menace',

'Attack of the Clones',

'Revenge of the Sith',

'A New Hope',

'The Empire Strikes Back',

'Return of the Jedi'$]$

ranking$\_$cols $=[$f$\text{'}$rank$\_\{$e$\}\text{'}$ for e in eps$]$

inpf $=$ inpf.dropna$($subset$=[\text{'}$seen$\_\text{'}+$ ep for ep in eps$],$ how$=$'all'$)$

inpf$[$ranking$\_$cols$]=$ inpf$[$ranking$\_$cols$].$apply$($pd$.$to$\_$numeric$)$

total$\_$responses $=$ inpf.shape$[0]$

dfperc$1=(($inpf$[$ranking$\_$colssum$()/$ total$\_$responses$).$reset$\_$index$()$

dfperc$1.$columns $=[\text{'}$Name$\text{'},$ 'Percentage'$]$

dfperc$1[\text{'}$Name$\text{'}]=$ names$\_1$

dfperc$2=(($inpf$[$ranking$\_$cols$].$isin$([3,4])).$sum$()/$ total$\_$responses$).$reset$\_$index$()$

dfperc$2.$columns $=[\text{'}$Name$\text{'},$ 'Percentage'$]$

dfperc$2[\text{'}$Name$\text{'}]=$ names$\_1$

dfperc$3=(($inpf$[$ranking$\_$cols$]>=5).$sum$()/$ total$\_$responses$).$reset$\_$index$()$

dfperc$3.$columns $=[\text{'}$Name$\text{'},$ 'Percentage'$]$

dfperc$3[\text{'}$Name$\text{'}]=$ names$\_1$

base$1=$ alt.Chart$($dfperc$1).$mark$\_$bar$($size$=20).$encode$($

x$=$alt.X$(\text{'}$Percentage$\text{'},$ axis$=$None$),$

y$=$alt.Y$(\text{'}$Name:N$\text{'},$ axis$=$alt.Axis$($tickCount$=5,$ title$=\text{'}\text{'}),$ sort$=$names$\_$l$))$

base$2=$ alt.Chart$($dfperc$2).$mark$\_$bar$($size$=20).$encode$($

x$=$alt.X$(\text{'}$Percentage$\text{'},$ axis$=$None$),$

y$=$alt.Y$(\text{'}$Name:N$\text{'},$ axis$=$None, sort$=$names$\_$l$))$

base$3=$ alt.Chart$($dfperc$3).$mark$\_$bar$($size$=20).$encode$($

x$=$alt.X$(\text{'}$Percentage$\text{'},$ axis$=$None$),$

y$=$alt.Y$(\text{'}$Name:N$\text{'},$ axis$=$None, sort$=$names$\_$l$))$

text$1=$ base$1.$mark$\_$text$($align$=$'left', baseline$=$'middle', dx$=3).$encode$($

text$=$alt.Text$(\text{'}$Percentage:Q$\text{'},$ format$=\text{'}\mathrm{.}0\%\text{'}))$

text$2=$ base$2.$mark$\_$text$($align$=$'left', baseline$=$'middle', dx$=3).$encode$($

text$=$alt.Text$(\text{'}$Percentage:Q$\text{'},$ format$=\text{'}\mathrm{.}0\%\text{'}))$

text$3=$ base$3.$mark$\_$text$($align$=$'left', baseline$=$'middle', dx$=3).$encode$($

text$=$alt.Text$(\text{'}$Percentage:Q$\text{'},$ format$=\text{'}\mathrm{.}0\%\text{'}))$

mixed$1=($text$1+$ base$1).$encode$($color$=$alt.value$(\text{'}$#$00$ab$41\text{'})).$properties$($

width$=100,$ height$=180,$ title$=$"Top third"$)$

mixed$2=($text$2+$ base$2).$encode$($color$=$alt.value$(\text{'}$#$008$fd$5\text{'})).$properties$($

width$=100,$ height$=180,$ title$=$"Middle third"$)$

mixed$3=($text$3+$ base$3).$encode$($color$=$alt.value$(\text{'}$#C$41$E$3$A$\text{'})).$properties$($

width$=100,$ height$=180,$ title$=$"Bottom third"$)$

res $=$ alt.hconcat$($mixed$1,$ mixed$2,$ mixed$3).$configure$\_$view$($

strokeWidth$=0$

$).$properties$($

title$=\{$

"text": "How People Rate the 'Star Wars' Movies",

"subtitle": "How often each film was rated in the top, middle and bottom third $($by $471$ respondents who have seen all six films$)"$

$\}$

$).$configure$\_$title$($

fontSize$=18,$ anchor$=$'start', offset$=20)$

return res

# let's check our solution

genRateVis$($sw$,$episodes$)$