人々は何を選びましたか？
モデルを当てはめる前に、各製品属性ごとに人々が何を選んだのかを把握しておきたいです。最も簡単なのは、特定の特徴を持つ車が何回選ばれたかを数えることです。この演習では、トランスミッション（変速機）に注目し、xtabs() 関数を使って、選ばれた車がマニュアルとオートマチックのどちらだったかの回数を集計します。
この演習はコースの一部です
Rで学ぶマーケティングのための選択モデリング
演習の手順
xtabs()関数の式をchoice ~ transに変更します。これは「trans変数の各水準ごとにchoice変数を合計する」という意味です。chosen_by_transテーブルの名前をそのまま入力してコンソールに表示します。マニュアルの車はオートマチックと比べて何回選ばれましたか？barplot()関数でchosen_by_transオブジェクトをプロットします。
実践的なインタラクティブ演習
このサンプルコードを完成させて、この演習に挑戦してみましょう。
# Create a table of chosen sportscars by transmission type
chosen_by_trans <- xtabs(___, data = sportscar)
# Print the chosen_by_trans table to the console
# Plot the chosen_by_trans object
barplot(___)